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velocidad al ordenador 
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LOCO ¿UN LEN- 
GUAJE PARA NIÑOS? 

Destacamos su versatilidad en aplicaciones pedagógicas 
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La nueva fiebre del oro 



Cuando los colonos norteamericanos 
descubrieron oro en el Lejano Oeste 
cundió la fiebre y el sueño de hacerse 
rico de la noche a la mañana pareció 
más próximo. Lo que sucedió es que 
muchos, la inmensa mayoría dejó la 
piel y la vida en Las Rocosas y apenas 
unos pocos afotunados alcanzaron el 
sueño. La referencia que bien puede 
sonar a parábola -y tal vez lo sea—, 
viene a cuento de lo que podríamos 
llamar la fiebre del software. 

Ante una situación de profundos 
cambios estructurales que vive la 
sociedad occidental, el campo de la 
tecnología en general y el de la 
informática en particular, hacen 
pensar que estamos ante un 
descubrimiento similar al de los 
pioneros norteamericanos en el siglo 
pasado. Cientos de jóvenes -los más 
propensos al sueño-, ven en la 
informática y en especial en la 
elaboración de programas el camino 
que los llevará a la Fama y a la fortuna. 
La realidad es mucho más prosaica y 
muchas veces no da lugar a que las 
fantasías se concreten. No se trata de 
negar la posibilidad del sueño, sino de 
situar las cosas en su sitio. De los miles 
y miles de personas dedicadas a la 
fabricación de software sólo unos 
pocos, los elegidos, encontrarán la veta 
aurífera o unas cuantas pepitas. Los 
demás tendrán que seguir quemándose 
las pestañas por un salario más o menos 
digno, pero que no los hará ricos. 

Hemos querido señalar este aspecto 
para que no despeguemos los pies del 
suelo. Podemos fantasear y soñar 
-nosotros también lo hacemos-, pero 
debemos saber reconocer cuando 
algunos medios informativos de gran 
tirada emplean, por ignorancia quizá, 
la exageración como sistema. 
Convengamos que ni los afortunados 
que descubrieron oro lo hicieron sin 
esfuerzo. 

MANHATTAN TRANSFERIA. 
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Línea directa 




COPIAR DE CINTA 
A PISCO 

Me interesaría conocer al- 
gún medio para grabar de 
CINTA a DISCO progra- 
mas protegidos, como 
KNIGHT LORE. 

Enrique Pérez Valle 

Villahermosa (C.REAL) 

Para realizar este tipo de 
copias necesitarías de un pro- 
grama especial que realizase 
esta operación. Este tipo de 
programas son en general 
complicados, y no conocemos 
ninguno en el mercado de los 
MSX. Puedes sin embargo, 
optar por adquirir las versio- 
nes en disco de los juegos co- 
merciales, ya que muchos tí- 
tulos empiezan a comerciali- 



zarse en los dos formatos: an- 
ta y disco. 

MEMORIA LIBRE 
EN UN PISCO 

Hace poco he comprado 
un MITSUBISHI de segun- 
da generación con unidad 
de disco. Cuando le pido la 
parte de disco que queda li- 
bre no me lo da. ¿Me po- 
drían indicar cómo se puede 
hacer? 

Fernando Esteban Sabaté 
BARCELONA 

Hemos de decirte que no 
existe ningún comando, ni en 
MSXDOS ni en DISK-BA- 
SIC que permita conocer la 
cantidad de memoria libre de 
un disco. La única forma de 
conseguir esta información es 



LIBROS MSX 



Les quedaría muy agrade- 
cido si puedieran indicarme 
algún buen libro sobre len- 
guaje máquina y programa- 
ción en dicho lenguaje. 

Antonio Arriero 

La Marañosa (MADRID) 

Es difícil recomendarte 
ningún título en concreto, ya 
que existen numerosos títu- 
los en el mercado MSX. Va- 
mos, sin embargo, a diferen- 
ciarte las posibles opciones en 
cuanto a libros que traten so- 
bre lenguaje ensamblador. 

En primer lugar existen los 
libros generales sobre Z-80, 
chip que rige el funciona- 
miento de los MSX. Estos li- 
bros suelen tener una gran 
calidad, ya que tocan todos 
los aspectos del microproce- 
sador; pero no tratan los as- 
pectos específicos de los 
MSX; entrada y salida, ma- 
pas de memoria, rutinas de la 
BIOS, etc. 

Existe también algún libro 
que trata sobre las interiori- 
dades de los MSX (sin prestar 
atención al lenguaje utiliza- 
do). En este tipo de libros 
puedes encontrar toda la in- 
formación necesaria para 
complementar lo aprendido 
con un libro general del Z-80. 
Por último, existen los li- 
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METODOLOGIA 
DE LA 
\pROGRAMACIOM 




bros de ensamblador para 
MSX. Esta solución es la más 
barata y la más cómoda. Es- 
tos libros suelen ser los más 
fáciles de comprender ya que 
incluyen numerosos ejem- 
plos y permiten empezar a 
realizar programas directa- 
mente sobre los MSX. Sin 
embargo suelen no ser ex- 
haustivos, ni en la exposición 
de las posibilidades del Z-80 
ni en la enumeración de ruti- 
nas internas de los MSX. No 
obstante esta aparente limi- 
tación, es esta la opción que 
te recomendamos si sólo de- 
seas conocer el ensamblador 
y hacer tus propios programas 
mena gestión. 



mediante el comando D1R 
del sistema operativo, que 
tras la lista de programas del 
disco indica la cantidad de 
memoria libre. Debes, para 
ello, disponer del sistema 
operativo MSX DOS. 

Existen también algunos | 
programas de aplicación que 
dan esta información. 

CARTUCHOS 
INOFENSIVOS 

Desde hace poco tengo 
un ordenador V-20 MSX y 
me he aficionado mucho a 
los cartuchos de juegos. 
Desde que los utilizo he no- 
tado que cuando conecto el 
ordenador tarda más en apa- 
recer la pantalla con el men- 
saje normal. 

¿Es peligroso utilizar car- 
tuchos? ¿Es un posible prin- 
cipio de una futura avería? 
¿Qué me aconsejáis? 

Federico Martí Pons 

Mercadar (MENORCA) 



En sí mismo, el uso de car- 
tuchos no presenta ningún 
tipo de riesgos, lo que puede 
resultar, a la larga, perjudi- 
cial para tu ordenador es el 
conectar y desconectar los 
cartuchos con mucha frecuen- 
cia, sobre todo si esta opera- 
ción no se realiza con cuida- 
do. 

Quede claro que ningún 
ordenador se estropea por 
usar cartuchos con él; pero al- 
gunos usuarios los conectan y 
desconectan con el ordenador 
encendido o con poco cuida- 
do, lo que puede provocar la 
rotura de una de las conexio- 
nes internas del ordenador 
aue, aunque a muchos no se 
lo parezca, no deja de ser un 
aparato relativamente delica- 




En resumen te podemos 
decir que no tengas ningún 
miedo a utilizar cartuchos de 
juegos, siempre que los co- 
nectes y desconectes con el 
cuidado suficiente. 

El hecho de que tarde más 
en aparecer la pantalla de 
presentación no creemos aue 
sea debido a ningún proble- 
ma con los cartuchos. 



Ri teman F+ 



IMPRESORA 



Quisiera saber si con mi 
impresora RITEMAN F+ y 
vuestro HardCopy puedo 
realizar las gráficas de mis 
programas y conocer vues- 
tra opinión sobre mi impre- 
sora. 

Néstor Nocí 
BARCELONA 

Efectivamente, con nues- 
tro HARDCOPY y cualquier 
impresora matricial puedes 
realizar copias en papel de los 
gráficos que aparecen en pan- 
talla gracias a una opción que 
permite definir el tipo de im- 
presora, ajustándose a cual- 
quier impresora del mercado. 

Por otra parte, si no nos 
equivocamos, tu impresora 
utiliza secuencias de escape 
compatibles EPSON, con lo 
cual tu impresora será acepta- 
da directamente por el pro- 
grama HARDCOPY. 

Acerca de nuestra opinión 
sobre tu impresora hemos de 
decirte que se trata de una de 
las impresoras con mejor re- 
lación calidad/ precio (debido 
tal vez a su original diseño); 
pero te encontrarás con el 
problema de que no se trata 
de una impresora MSX con 
los problemas que esto te 
pueda comportar (normal- 
mente mínimos). En definiti- 
va una buena adquisición. 

MEMORIA INSUFICIENTE 

Hace una temporada 
compré un juego de 64 Kb 
pero, aunque mi ordenador 
es un Toshiba HX-10 de 64 
Kb, unas veces lo cargaba y 
otras no. En el comercio 
donde lo había comprado 
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me dijeron que aunque el or- 
denador indicaba 64 Kb 
sólo contaba con 48 Kb, ya 
: 16 Kb están dedicados a 
r ¿Me ocurrirá lo 

mas? 

Jesús Orbán Cerredelo 
ORENSE 

Aquellos que te informa- 
ron sobre la causa de que el 
juego no funcionase en tu or- 
denador no estaban muy bien 
informados, ya aue tu orde- 
nador, un Toshiba HX-10 
cuenta con un total de 80 Kb 
de RAM, de los cuales 64 Kb 
son de RAM de CPU y 16 Kb 
de VRAM. Evidentemente 
W es la memoria la causa de 
que el programa no cargue co- 
rrectamente. 

Por el hecho de que el jue- 
go cargase algunas veces yo- 
demos suponer aue el proble- 
ma radica en el cassette. In- 
tenta ajustar el azimut del ca- 
bezal de tu aparato de casset- 
te para solucionar este pro- 
blema. 

Si tu ordenador tiene 64 
Kb no tendrás ningún proble- 
ma a la hora de cargar nues- 
tros programas. 

CARTUCHOS YAMAHA 

Quisiera saber si los car- 
tuchos que comercializa 
YAMAHA para sus mode- 



ra™/,* CX5M 

los CX5M y CX5M II; (FM 
MUSIC MACRO, DATA 
MEMORY, MUSIC COM- 
POSER, VOICING PRO- 
GRAM, etc) son totalmente 
compatibles con los demás 
modelos MSX existentes en 
el mercado. 
Angel Luis Viaña Alvarez* 
Alcalá de Henares 
(MADRID) 

Los cartuchos que comer- 
cializa YAMAHA y que nos 
comentas en tu carta no son 
compatibles con el resto de 
los ordenadores MSX ya que 
hacen uso de las posibilidades 
de sonido que incorporan sus 
aparatos y que no se encuen- 
tran en los demás MSX. 

Esto no quiere decir que 
este modelo sea incompatible 
con los demás MSX, ya que 
cualquier programa MSX, sea 
en cinta o cartucho debe fun- 
cionar correctamente sobre 
este aparato, y cualquier pro- 
grama realizado sobre este 
aparato funcionará sobre el 
resto de los MSX siempre que 
no se haga uso de sus posibili- 
dades ampliadas de sonido. 

Esta aparente incompati- 
bilidad hace que los ordena- 
dores MSX estén siendo muy 
aceptados en el mercado, ya 
que permiten resolver cual- 
quier tipo de aplicación sin 
que por ello se tenga que acce- 
der a ordenadores incompati- 
bles, es decir, si se desea una 
aplicación musical podemos 
adquirir un ordenador espe- 
cialmente dotado para esta 
actividad (YAMAHA CX5M 
I ó II) sin aue por ello deje de 
ser un ordenador MSX en el 
que funcionarán todos los 
programas existentes en el 
mercado. 



Especial para nuevos 
usuarios. 

Para que ningún lector 
quede al margen te propo- 
nemos una nueva sección/ 
concurso. 

¡Participa con tu pe- 
queño programa de gráfi- 
cos, sonido, juego o truco! 

BASES 

1. ° Podrán participar to- 

dos nuestros lectores, 
cualquiera que sea su 
edad. 

2. " Los programas se re- 

mitirán grabados en 
cassettes debidamente 
protegidas dentro de 
su estuche plástico. 

3. ° No se admitirán aque- 

llos programas plagia- 
dos o editados por 
otras publicaciones. 

4. ° Las mejoras a los pro- 

gramas se considerarán 
una aportación al mis- 
mo y se publicarán en la 
sección Línea Directa. 

PREMIOS 

5. " MSX CLUB premiará 

aquellos programas 
publicados con 2.000 
pts. 

6. " MSX CLUB se reserva 

el derecho de abonar 
los premios en metáli- 
co o su equivalente en 
software, haciéndolos 
efectivos a los 15 días 
de publicados. 

FALLO Y 
JURADO 

7. " El Departamento de 

Programación actuará 
como jurado y su fallo 
será inapelable. 

8. ° Los programas remi- 

tidos no se devolve- 
rán, siendo destruidos 
aquellos que no sean 
seleccionados. 
10." El plazo finalizará el 
30 de junio de 1987. 
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CON GARANTIA 
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MEMORIA MAGICA 

Al teclear un programa, 

f;rabarlo en cassette, borrar- 
o con NEW o haciendo RE- 
SET (pero sin apagar el or- 
denador) y cargar el progra- 
ma anteriormente grabado 
pero interrumpiendo la car- 
ga a la mitad,. es decir, sin 
que el ordenador acabara de 
recibir toda la información, 
me quedé sorprendido al 
comprobar que haciendo 
LIST sale todo el programa 
íntegro y si hago RUN se eje- 
cuta correctamente, aunque 
dicen que tras hacer NEW o 
RESET no se puede recupe- 
rar el programa. ¿A qué se 
debe ésto? 

Javier Mendoza 
Badalona (BARCELONA) 

Efectivamente, el fenóme- 
no que nos comentas es per- 
fectamente lógico y explica- 
ble (aunque a primera vista 
parezca cosa de magia). La 
instrucción NEW, al igual 
que el hacer un RESET del 
ordenador, no borran toda la 
memoria sino que únicamen- 
te vuelven a inicializar todas 
las variables del BASIC, es 
decir, todas las variables se 
ponen a cero o a sus valores 
iniciales. 

Al hacer NEW, por tanto, 
sólo se borran las variables 
que contienen la longitud del 
programa, su situación en la 
memoria, etc, y el resto del 
programa permanece intacto 
en la memoria. 

Cuando cargas un progra- 
ma en BASIC desde una cinta 
lo primero que se carga son 
los valores de estas variables. 

El fenómeno que te ocurre 
se explica de este modo de 
una forma muy sencilla. 

El programa, aunque ha- 
gas NEW, permanece en la 
memoria, por lo que a los po- 
cos segundos de carga del cas- 
sette ya no se necesitan más 
datos. El programa estaba en 
memoria, y lo primero que ha 
encontrado el ordenador en 
la cinta son los valores de las 
variables que se habían bo- 
rrado. De este modo obtienes 
el listado de todo el programa 



aunque no se haya cargado de 
la cinta en su totalidad. 

UNIDADES DE DISCO 
NO MSX 
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¿Se puede conectar a un 
denador MSX una unidad 
de disco Apple de 5 1/4 pul- 
gadas con interfaz aue co- 
mercializa Spectravídeo? 

Juan Antonio Rubí 
BARCELONA 

No creemos que sea posi- 
ble semejante conexión ya 
que Apple dista mucho de 
cumplir las normas estableci- 
das por los MSX. 

Aunque esta conexión fue- 
se factible (cosa que creemos 
muy improbable) la unidad 
de disco no dispondría del 
formato adecuado para leer 
otros discos de MSX (ni si- 
quiera si fuesen de 5 1/4 pul- 
gadas), por lo que no creemos 
acertada esta posibilidad. 

La unidad de disco se vería 
relegada a grabar tus propios 
programas y ficheros, y no po- 
drías, en ningún caso, utilizar 
programas desarrollados por 
otros usuarios o bien progra- 
mas comerciales, a no ser que 
lo hicieses mediante la cinta 
de cassette. 

Te recomendamos, pues, 
que te dirijas hacia una de las 
muchas unidades de disco 
que existen en el mercado 
MSX, y entre las que hay una 
amplia gama de precios y 
prestaciones. 

BASEBALL MSX 

Me gustaría saber si existe 
en España algún juego de 
Béisbol, en cinta o cartucho, 
para ordenadores MSX, su 
precio y qué casas se encar- 
gan de su distribución. 

Carlos Morant Ramón 
Gandía (VALENCIA) 

Existe un interesante pro- 

frama de Béisbol en los 
ÍSX. Su nombre es 
"Baseball crazy" y se encuen- 
tra en los MSX en formato 
Beecard. Los distribuye Sony 
España, y su precio, incluyen- 
do el adaptador de Beecard es 
de 8.500 Pías. 





SKY HAWK. Un magnifico Juego de simula- 
ción de vuelo. En él te conviertes en un piloto 
) ha de derribar al enemigo y regresar al 
«lvo.PVP. 1.000 pts. 




VAMPIRE. Ayuda al audaz Guillermo a salir 
del castillo del Vampiro, sorteando murcié- 
lagos, fantasmas, etc. Un Juego terrorífica- 
mente entretenido para que lo pases de mie- 
do. PVP. 800 Pts. 




HARD 
GOPY 

POR JOAQUIN LOPEZ 



en blanco y nafro copia 
ípritea redefine colorea 
compatible con cualquier 
impresora matriclal 



LORD WATSON. Este es un Juego muy original 
que combina el laberinto con las palabras 
cruzadas. Los obstáculos fantásticos y el vo- 
cabulario son los alicientes . PVP. 1.000 pts. 



CON GARANTIA 



HARD C0PY. Para copiar pantallas. Tres 
formatos de copias, simulación por blanco y 
negro, copia sprites, redefinic. de colores, 




MATA MARCIANOS. Un Juego clásico en una 
versión cuya mayor virtud es su diabólica ve- 
locidad que aumenta a medida que superamos 
las oleadas de los Invasores extraterrestres. 
PVP. 900 pts. 



¿Cómo corregir los errores 
de transcripción de los 
programas? 
La solución a los errores en 
los programas es este TEST 
DE LISTADOS. 



CON GARANTIA 

4#HPN TRANSFERI 



TEST DE LISTADOS. El segundo programa de 
la Serie Oro es el útilísimo Test que te permi- 
tirá controlar la corrección de los progra- 
mas que copies de MSX CLUB y MSX EXTRA. 
PVP. 500 Pts. 
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KRYPTON. La batalla mas audaz de las gala- 
xias en cuatro pantallas y cuatro niveles de 
dificultad. Un juego cuya popularidad es cada 
vez mas grande entre los usuarios del MSX. 
PVP.500Ptas. 



U-BOOT. Sensacional juego de simulación 
submarina en la que tienes que demostrar tu 
pericia como capitán de un poderoso subma- 
rino de guerra. Panel de mandos, sonar, tor- 
pedos, etc. PVP 700 Ptas 



CON GARANTIA 



QUINIELAS. El mas completo programa de 
quinielas con estadística de la liga, de los 
aciertos, etc. e impresión de boletos. Acertar 
no siempre es cuestión de suerte. PVP. 700 
Ptas 




SNAKE. Entretenido y muy divertido juego 
en el que Snake procura comer unos núme- 
ros que la engordan. Tanto las murallas que 
la rodean como su larga cola pueden ser 
mortales para ella. PVP 600 Ptas. 




EL SECRETO DE LA PIRAMIDE. Atrevido 
juego de aventuras a través de los misterios 
y peligros que encierran los laberínticos pa- 
sillos de una pirámide egipcia. ¡Atrévete si 
puedes! PVP. 700 Ptas. 



STAR RUNWER. Conviértete en el audaz 
piloto interestelar y lucha a muerte, a 
través del hiperespacio, contra las defen- 
sas del tirano Daurus. Dos pantallas y 
cinco niveles de dificultad. PVP. 1.000 pts. 



FLOPPY, El Preguntón. Un verdadero desafio 
a tus conocimientos de Geografía e Historia 
española. Floppy no perdona y te costara 
mucho superarlo. PVP. 1.000 Ptas. 



MAD FOX. Un héroe solitario es lanzado a 
una carrera a vida o muerte por un desierto 
plagado de peligros. Conseguir el combusti- 
ble para sobrevivir es su misión Diez niveles 
de dificultad. PVP 1 000 pts 



Si quleresrecibir por correo ^certlñcado^stascassettM garanttodas^ecortao copia este boletín y envíalo hoy mismo: 



n 



Nombre y apellidos: 

Dirección: 

Población: 



□ KRYPTON 

□ UBOOT 

□ QUINTELAS 

□ HARDCOPY ... 

□ LORDWATSON 



CP 



Prov. 



Tel.: 



Ptas. 500,- □ SNAKE Ptas. 600,- 

Ptas. 700,- □ EL SECRETO DE LA PIRAMIDE Ptas. 700- 

Ptas. 700- □ STARRUNNER Ptas. 1.000- 

Ptas. 2.500- □ TEST DE LISTADOS Ptas. 500,- 

Ptas. 1.000,- □ MATA MARCIANOS Ptas. 900- 



□ FLOPPY .. 

□ MAD FOX 

□ VAMPIRO 

□ SKYHAWK 



Ptas. 1.000- 
Ptas. 1.000- 
Ptas. 800- 
Ptas. 1.000- 



jJJastos de envío certificado por cada cassette Pt^.70,-ReMto1^ónbaiicariodePta8 a la orden de Manhattan Transfer, SAj 

ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 

IMPORTANTE: Indicar en el sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 10-12 BAJOS. 08023 BARCELONA 

Para evitar demoras en la entrega es imprescindible indicar nuestro nuevo código postal. 



NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITAMELAS 

A NUESTRA REDACCION. ¡NO SE ADMITE CONTRA REEMBOLSO! 



Tablón de anuncios — — ^^m^m^^— 

Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a dos inserciones totalmente gratuitas. Las cáracterísticas 
de esta sección no permiten la inclusión de anuncios con fines de lucro. Advertimos que la desprotección yropia de software original es 
un acto delictivo perseguido por la ley. 



Vendo Sony HB-101F con am- 
pliación de memoria de 64 Kb, 
además de manuales, etc. por 
40.000 ptas. Manuel. Tlf: 889- 
63-61. MADRID. CP2. 
Contacto con usuarios de uni- 
dad de disco de 3.5", para cam- 
biar todo tipo de información. 
Agustí Obradors Muntadas. C/. 
Major, n.° 68, 2.°, 2. a . 08513 
Prats de Llucanes. BARCELO- 
NA. CP2. 

Vendo Sony HB-75P, de 80 
Kb, incluyendo cables, 2 ma- 
nuales, embalaje original, BIT- 
CORDER SDC-500 de Sony, 5 
libros, más de 100 revistas, etc. 
Todo por 50.000 ptas. Alberto 
García Pérez. C/. Bages, n.° 64, 
l.°-A. TARRASA (BARCELO- 
NA). Tlf: (93)785 51 52. CP2. 
Vendo MUSIC-MODULE de 
Philips para MSX con cinta de 
efectos especiales, totalmente 
nuevos, y Spectravideo 283 con 
manuales, grabadora y progra- 
mas por 40.000 ptas. y 22.000 
por separado cada uno. José 
Muñoz. Av. Suecia, 4, 30. VA- 
LENCIA 46010. Tlf: (96) 369 
95 71.CP2. 

Intercambio Monkey Acade- 
my, Road Fighter, chino y ten- 
nis (los dos primeros de Kona- 
mi) por Soccer de Konami. 
Agustín García. S. Antonio 
María Claret s/n. CONSTAN- 
TI (TARRAGONA). Tlf: 977- 
52 25 41.CP2. 

Intercambio cartucho de am- 
pliación de memoria de 16 Kb 
HBM16, cartucho KONAMFS 
SOCCER, cartucho de juego 
BATTLE CROSS y cassette 
original H.E.R.O. por cartucho 
de ampliación de memoria de 
64 Kb. Regalo revistas MSX 
EXTRA n.°( 12, 13), y 16 al 21. 
Luis Alberto Alaiz. Av. José 
Quintana. 34100 SALDAÑA 
(PALENCIA). Tlf: (988) 89 01 
91.CP2. 

Vendo' 10 programas MSX ori- 
ginales tales como "Las 3 luces 
deGlaurung", "Goonies", etc., 
por sólo 2.400 ptas. Oscar Mar- 
tín Martín. C/. Huesca, 26. 
47320 Tudela de Duero. VA- 
LLADOLID. CP2. 
Vendo ordenador HB-75P de 
Sony y además cuatro cartu- 
chos, dos cintas y manuales con 
algunas revistas por sólo 33.000 
ptas. Jaime Rovira Matías. 
Avda. Catalunya, 133, 1.°, 2. a 
Parets del Valles. BARCELO- 
NA. Tlf: 562 09 85. CP2. 



Cambio tableta gráfica SVI- 
105 para ordenador SVI-318/ 
328 por ratón o bola gráfica 
para MSX. Carlos Martínez. C/. 
Callejón del Moro, 1. Huete. 
CUENCA. CP2. 
Compro adaptador al sistema 
MSX, SVI-606 y adaptador 
para cartuchos de MSX para 
SVI-328.. Precio a negociar. 
Francisco J. Alvarez. C/. Vía 
Norte, 34, 7.°-D. Vigo. PON- 
TEVEDRA. Tlf: (986)41 12 08 
por las noches. CP2. 
Cambio varios juegos origina- 
les de cartucho por un adapta- 
dor SOFTCARD o bien por un 
cartucho de ampliación de 64 
Kb. También estaría dispueto a 
venderlos. Asier Basterretxea. 
C/. Loraitz bat n.° 1, 2.°-B. 
Fuenterrabía. GUIPUZCOA. 
Tlf: (943) 64 42 75. CP2. 
Vendo Toshiba HX-10, data 
recorder Sanyo, Videojuego 
Atari, Cartuchos Atari, 30 re- 
vistas MSX-Club y MSX-Ex- 
tra, 4 joysticks. Precio a conve- 
nir. Santi Román. P.° Manuel 
Girona, 4. 08034 BARCELO- 
NA. CP1. 

Intercambio psicodélico de . 
tres focos con regulación de vo- 
lumen, etc., nuevo a estrenar. 
Un órgano CASIO PT-82 con 
cinta de canciones, cámara 
WERLISA Club y un videojue- 
go, todo valorado en 27.000 
ptas. por ordenador MSX. Car- 
los Ordóñez Luque. C/. Mon- 
sants 8-10, 2.°, 2. a Prat Llobre- 
gat. BARCELONA. CP2. 
Contacto con personas intere- 
sadas en aprender código má- 
quina. Poseo ensamblador para 
SVI-3 18/328. Carlos Carbonell 
Carrera. 0,1 . Los Yébenes 133, 
2.°, dcha. 28047. MADRID. 
CP2. 

Cambio juegos originales. Ten- 
go más de 50 (Boxing, Soccer, 
etc.). Cartuchos y cintas. Ga- 
rantizo contestación. Luis Es- 
cudero García, Casablanca, 11. 
04740 Roquetas de Mar. AL- 
MERIA. CP2. 

Vendo lU programas originales 
MSX (Knightmare, Batman, 
etc.) por sólo 2.400 ptas. Jorge 
Sanz Pérez. Tlf: (983) 52 03 17. 
CP2. 

Compro lenguaje LOGO y ma- 
nual. José I. Carbajo. C/. Can- 
ciller Avala, 10, 6.°-B. 01004 
VITORIA. Tlf: 25 66 50. CP1. 
Vendo consola videojuegos 
CBS, 3 juegos, 2 joysticks y vale 



de 5.000 para ampliar esta con- 
sola CBS. Baratísimo. Marco A. 
Fauz. BARCELONA. Tlf: (93) 
427 95 79. CP2. 
Vendo Toshiba HX-10 com- 
prado Reyes 1986 por sólo 
20.000 ptas. Antonio Montes. 
GERONA. Tlf: 23 00 30 por la 
noche y 20 30 00 en horas de 
trabajo. CP2. 

Cambio 10 juegos originales de 
Konami (Track&Field, Sky Ja- 
guar, Boxing, etc.), por amplia- 
ción de memoria de 64 Kb. Je- 
sús Rodríguez Soriano. C/. Re- 
yes Católicos 96, 3.°, 1. a Saba- 
dell. BARCELONA. Tlf: 710 
86 17. CP2. ' 

Cambio 13 juegos originales de 
Konami (Hiper Sports 1-2, 
Soccer, Tennis, etc.) y 4 cintas 
originales (Hero, Pitrall 2, BC 
Grog's Revenge, Oh shit) por 
FM Music Macro o LOGO 
Philips. Ismael Cívico Garrido. 
C/. Esteban Paluzie 112. Saba- 
dell. BARCELONA. Tlf: 710 
33 28. CP2. 

Vendo HB-55P, ampliación de 
memoria (HBM-16), embalaje 
original y cables, manuales, 
mezclador de imagen, libro de 
programación, curso de BA- 
SIC, lenguaje PASCAL (con 
manual), ensamblador/moni- 
tor ZEN, 40 cartuchos de jue- 
gos. Todo por 27.000 ptas. Os- 
car Marina Saiz C/. Andalucía 
n.° 2-3A. Baracaldo. VIZCA- 
YA. Tlf: 490 0019. CP2. 
Vendo Philips VG-8010 con 
sólo 5 meses y muy poco uso. 
Adjunto bastantes juegos y por 
sólo 20.000 ptas. Ramón Otero. 
Pulin Costaña, n.° 8. 27500 
Chantada. LUGO. Tlf: (982) 
44 01 15.CP2. 

Compro unidad de disco para 
diskettes de 5,25 ó 3,5 pulga- 
das, impresora o impresora- 
plotter, Music Modules y en- 
samblador/desensamblador. 
También cambio programas 
MSX originales, preferente- 
mente de gestión. José Ribelles. 
Tlf: (96) 370 94 85. San José de 
La Montaña 14-D. 46008 VA- 
LENCIA. CP.l. 
Intercambio trucos, conoci- 
mientos del MSX y de la uni- 
dad de disco 3,5 pulgadas. Po- 
seo mapas de memoria ROM. 
Carlos Mateos. C/. Doctor Za- 
menhof, 24, 3.°, 1. a . 08240 
Mantesa.' BARCELONA. CP. 1 . 
Vendo en perfecto estado por 
compra de un MSX-2, ordena- 



dor YASHICA MSX, 64 Kb 
RAM, manual en castellano, 20 
juegos comerciales y libro de 
programación por 33.000 Ptas. 
Francisco Bautista Ferraz. Tlf. 
252 2 1 74. C/. Narciso Serra n.° 
6. 28007 MADRID. CP.l. 
Vendo cartuchos Yie-Ar Kung 
Fu 2, Time Pilot, Hyper Ram- 
my y Antartic Adventure y cin- 
tas originales de Pastfinder, Su- 
per Chess y Oh! Mummy. To- 
dos con instrucciones. Agustí i 
Caries Forrellat^Brossa. ^Tlf: 

Vend 8 o°c 8 art^^ 
lips para los MSX junto con 
manual de instrucciones. J. Ra- 
món Alvarez. Tlf: 94-499 84 77. 
BARAKALDO. CP.l. 
Vendo Spectravideo SVT-728 
muy poco usado, con muchos 
juegos, todos los accesorios del 
ordenador, muchas revistas, 
ioystick, etc, casi regalado. 
También vendo Spectrum 48 
Kb muy barato. Lo vendo todo, 
junto o separado por compra 
de un MSX-2. Francisco Javier 
Paz. Tlf: (91) 200 96 72. C/. Las 
Pedroñeras 14, 4.° 3. a . 28043 
MADRID. CP.l. 
Vendo ordenador ORIC AT- 
MOS de 48 Kb, teclado profe- 
sional, seis juegos y un procesa- 
dor de textos y cables para tele- 
visor y grabadora por sólo 
15.000 Ptas. Valorado en 
40.000 Ptas. Javier López. Tlf: 
(93) 841 71 74 a partir de las 
19,15 h. CP.l. 

Vendo juegos (código máqui- 
na) para SV-328 o SV-318, cin- 
tas originales y los mejores jue- 
gos. José Jorge Vaz. Tlf: (968) 
27 50 70. C/. Travesía de Vigo, 
n.° 28, 3.° B. Vigo-6. PONTE- 
VEDRA. CP.l. 

Vendo ordenador Toshiba 
HX-10 por 30.000 Ptas. Carlos 
Sánchez López. Tlf: 22 69 76. 
Avda. Portugal 48-50, 8.° B. 
37003 SALAMANCA. CP.l. 
Compro tarjeta controladora 
de disco y otros periféricos para 
Spectravideo SVI-3 18/328. 
José M. Muñiz. C/. M. Hermi- 
da, 72-P1-5B. 39009 SAN- 
TANDER. CP.l. 
Vendo Spectravideo SV-328 de 
80 Kb RAM, Super Expander 
SV-601 con 7 conectores, con- 
trolador de discos SV-801, uni- 
dad de disco de 5 1/4 pulgadas 
SV-902 y cassette especialpara 
ordenador SV-903, con todos 
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los manuales y complementos, 
discos y cintas con juegos. 
Todo por 55.000 Ptas. Willy 
Miragall. Tlf. (93) 560 53 49 (a 
partir de las 21h). Av. Uno n.° 
4, 2° 3. a . Sta. Perpetua de Mo- 
goda. BARCELONA. CP.l. 
Vendo Sony HB-75P de 80 Kb, 
cassette Sony SDC-500 y lápiz 
óptico Sanyo MLP-001, cartu- 
chos y juegos. Francesc Rosado 
Safont. Tlf. (93)384 41 67. Ba- 
dalona (BARCELONA). CP.l. 
Vendo Spectravídeo 728 MSX 
y unidad de disco Toshiba 3.5". 
Poco uso. Regalo discos con 
juegos y aplicaciones como 
dBASE H, WordStar, Cobol, 
Fortran, etc. Precio a convenir. 
Manuel Javier Lombao Iglesias. 
Avda. Rubine 13-15 2.° C. 
15004. LA CORUÑA. Telf. 
(981)27 83 42de2a4ydel0a 
12. CP1. 

Vendo Sony HB-101P con to- 
das conexiones, libros y revis- 
tas. Sólo se ha usado dos veces. 
José Juan Fernández. C/Con- 
cepción Edif. Alhambra 3.° C. 
GRANADA. Tlf. 20 26 39 (de 
8 a 14 horas). CP.l. 
Contacto con usuarios de Spec- 
travídeo SVI-328 para inter- 
cambiar información. Roberto 
Alcalde. C/Padre Aramburu 
n.° 5, 2.° C izq. 09006 BUR- 
GOS. Tlf. 21 08 76. CP.l. 
Vendo cartucho original de 
GREEN BERET de KONA- 
MI. Nuevo, con instrucciones 
en castellano por 4000 Ptas. 
Contrareembolso. Interesados 
escribir al apartado de correos 
342 VITORIA (ALAVA). 
Cambio curso de BASIC MSX, 
marca Sony en vídeo BETA ori- 
ginal y sin usar por tres juegos 
comerciales originales en cas- 
sette o por dos juegos si alguno 
es en formato de cartucho. Es- 
cribir indicando títulos a María 
Luisa Causo. C/Funicular 18, 
2° Iz. Valle de Trapaga. VIZ- 
CAYA. CP.l. 

Intercambio programas MSX 
originales. Tengo GOONIES, 
GREEN BERET, CAMELOT 
WARRIORS, etc. Me interesan 
THUNDER BALL, EQUI- 
NOX, LODE RUNNER. Ma- 
nuel Mateo Cordón. C/Santo 
Domingo n.° 7. 11006 CADIZ 
CP.l 

Vendo ordenador Sanyo 64 Kb 
MSX y cassette nuevo por 
50000 Ptas. Regalo cartucho 
"Konami's Tennis", revistas y 
juegos. Margarita Porro. C/ 
Emilio Ortuño n.° 8, 3.° 19. 
03500 Benidorm. ALICANTE. 
CP.l. 

Vendo Spectravídeo 728 y uni- 
dad de disco SVI 707, progra- 
mas, etc por 85.000 Ptas. Juan 
José Polero. C/Badal, 140, 5.°. 



Tlf. 332 38 14. 08028 BARCE- 
LONA. CP.l. 

Vendo ordenador Spectraví- 
deo 728 MSX de 80 Kb con ga- 
rantía, libros y 50 juegos origi- 
nales por 30.000 Ptas. Juan M. a 
Gorrotxategui. Tlf. (943) 88 54 
74. Guipúzcoa 16, 4.° C. 20240 
Ordiria. GUIPUZCOA. CP.l. 
Vendo HIT BIT 55-P por 
17.000 Ptas. Incluyo en el pre- 
cios un cartucho PEETAN, 2 
cintas de ADVANCE (gusano 
y editor musical) además de los 
manuales y cables de conexión 
del propio ordenador. Francis- 
co Alarcón Hidalgo. C/L'alou 
27-bajos. S. Boi de Llobregat. 
BARCELONA. CP.l. 
Compro ampliación de memo- 
ria de 16 ó 64 Kb, urgentemen- 
te. Gonzalo Márquez Benítez. 
C/Ntra. Sra. Merced S/N. C/P. 
Aljoxaní. CORDOBA. CP.l. 
Intercambio programas origi- 
nales (juegos, aducativos y de 
aplicación). Poseo una gran 
cantidad de títulos. Juan Ma- 
nuel Sen. Tlf: 22 20 55. C/Gó- 
mez Ulla 18-22, 2.° D. SALA- 
MANCA. CP. 1. 
Vendo ordenador PHILIPS 
MSX de 80 Kb sin estrenar por 
25.000 Ptas. David Altafaja. 
Tlf: 211 85 95. CP.l 
Vendo Philips MSX VG-8010 
80 Kb más 30 programas por 
33.000 Ptas. Juan. Tlf: (954) 14 
18 07. CP.l. 

Vendo ordenador SVI-728 de 
80 Kb por 33.000 Ptas o lo cam- 
bio por un Commodore 64/ 128 
Kb. Alfonso Montoya Quiles. 
Tlf: 43 16 12. Pza. Nueva n.° 5. 
Albox. ALMERIA. CP.l. 
Vendo Sony HIT-BIT 101P; 
casi no lo he utilizado. Buen 
precio, a convenir. M." Teresa 
Martínez García. Tlf: (968) 61 
64 48. C/Millán Astray n.° 29. 
30500 Molina de Segura. 
MURCIA. CP.l. 
Vendo Sony HB-5P y amplia- 
ción de memoria a 32 Kb por 
20.000 Ptas. Ordenador sin 
ampliación por 15.000 Ptas. 
Luis Marco. Tlf: (96) 120 2 1 58. 
C/Diputación n.° 5, 8.°. Silla. 
VALENCIA. 

Vendo MITSUBISHI MSX 80 
Kb modelo FX2. Regalo cinta 
con juegos. Precio a convenir. 
Tlf. (943) 39 63 36. Preguntar 
por JON. DONOSTIA. C/Ju- 
lio Urquijo 30, 5.° A. CP.l 
Vendo ordenador Philips VG- 
8000 con ampliación de memo- 
ria de 16 Kb, 30 juegos comer- 
ciales, libros y revistas por 
20.000 Pts. Compro unidad de 
disco MSX. Juan M. a Gorrot- 
xategui. Tlf: (943) 88 54 74. 
Guipúzcoa 16, 4.° C. 20240 Or- 
dizio. Guipúzcoa. CP.l. 



MVIER GUERRERO 
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UN LIBRO 
PENSADO PARA 
TODOS LOS 
QUE QUIEREN 
INICIARSE DE 
VERDAD 
EN LA 

PROGRAMA- 
CION BASIC 

Construcción de 
programas. El potente 
editor todo pantalla. 
Constantes numéricas. 
Series, tablas y 
cadenas. Grabación de 
programas. Gestión de 
archivo y grabación 
de datos. Tratamiento 
de errores. Los 
gráficos del MSX. 
Los sonidos del MSX. 
Las interrupciones. 
Introducción al 
lenguaje máquina. 



Y ADEMAS PROGRAMAS DE EJEMPLO 

Alfabético. Canon a tres voces. Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. La Flauta Mágica de Mozart. 
Scrapple from the apple & Donna Lee. The entretainer. Teclee un 
número. Calendario perpetuo. Modificación Tabla de colores 
SCREEN 1. Rectángulos en 3-D. Juego de caracteres alfabéticos en 
todos los modos. Juego Matemático. Más grande más pequeño. 
Poker. Breackout. Apocalypse Now. El robot saltarín. El archivo 
en casa. 



Deseo me envíen el libro de los secretos del MSX, para lo 
cual adjunto talón de 1.500 ptas. a la orden de MAN- 
HATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle n." 

Ciudad CP 

Este boletín me da derecho a recibir los secretos MSX en 
mi domicilio libre de gastos de envío o cualquier otro 
cargo. No se admite contrareembolso. 

Importante: Indicar en el sobre MANHATTAN 
TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 

Roca i Batlle, 10-12 Bajos - 08023 BARCELONA 
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La primera revista de CompactDisc de España 
COMPACTA Y DIFERENTE 

Totalmente pensada para los usuarios de CD, un concepto 
revolucionario en la reproducción del sonido. 

Toma nota de nuestro sumario 

- PLACIDO DOMINGO 

- MILES DA VIS 

- CRITICA MUSICAL 

- NOVEDADES EN APARATOS 

- COMPLETO CATALOGO DE DISCOS COMPACTOS 
Música clásica y jazz 

- SUPER TOP 




NO ES CASUALIDAD 




Esta Primavera 
Sony da mucho juego 



NUEVOS PROGRAMAS MSX 




LAS VEGAS. 


ROMA. LA 


LOOE 


Juego de de- 


CONQUISTA 


RUNNER II. 


tectives. Debe- 


DEL IMPERIO. 


Excitante juego 


rás recuperar 


La conquista 


de aventuras y 


una alta suma 


de las tierras 


prueba de ha- 


dedinero deun 


del imperio ro- 


bilidad. 


«capomafioso». 


mano. 





SPACE KIT. 

Para dibujar el 
espacio como 
tú siempre lo 
has imaginado. 



PRINT LAB. 

Diseñador grá- 
fico. Incluye un 
cassette con 19 
interesantes 
trazados y dibu- 
jos. 



GRAPHIC 
MASTER. 

Editor gráfico. 



MUSIC 
STUDIO. 

Para compo- 
ner canciones 
sin necesidad 
de tener cono- 
cimientos de 
música. 



FARM KIT. 

Construye y 
pinta la granja 
de tus sueños. 



NUEVOS PROGRAMAS MSX2 



_ OUANAMfMT QOLF 

WORLD GOLF 




■ ti 




1 KIHÉTIC 
C0NH0CTI0N 




CHOPPER 2. 

Al mando de un heli- 
cóptero blindado de- 
berás combatir a tus 
enemigos. 



RED LIGHTS OF 


HYDLIDE. 


WORLD 


LAYDOCK. 


AMSTERDAM. 


Programa de acción. 


GOLF. 


Eres el piloto escogi- 


La más excitante par- 


El príncipe debe res- 


Juega al golf como 


do para devolver la 


tida de poker que ja- 


catar a la princesa 


un profesional. 


paz al Universo. 


más hayas jugado. 


con muchas dificulta- 






des. 







¡ No te los pierdas ! 



KINETIC 
CONNECTION. 

Forma la figura miste- 
riosa atrapando los 
objetos voladores. 



SONY 



HIT3IT 



YA ESTA EN TU QUIOSCO. Sto 



UNA REVISTA EXCEPCIONAL. Stop 




Diseñada para servir 



al usuario de un PC. Stop 



EL COMO Y EL POR QUEDE 



TANDAR COMUN. Stop 






OTRO PRODUCTO MANHATTAN TRANSFER; S.A. Stop 



A la vanguardia de la prensa útil. Stop 



El basic paso a paso 



.Por Willy Miragall. 



LOS BUCLES 



La máxima eficiencia de un or- 
denador viene dada por la posi- 
bilidad de repetir una tarea de- 
terminada un gran número de 
veces y a una alta velocidad. 
Hoy hablaremos de cómo con- 
seguir esto. 



¿QUE SON BUCLES? 

Llamamos bucle a un conjunto de 
instrucciones de un programa 
que se ejecutan repetidamente. 
Existen muchos tipos de bucles que 
consideraremos según la condición 
que permite que dejen de funcionar, 
rara ver más claramente esto, propon- 
dremos nuestra primera división cíe los 
bucles. 

Bucles infinitos son aquellos en que 
el conjunto de instrucciones encerra- 
das en el bucle se ejecutan indefinida- 
mente. Damos a continuación un ejem- 
plo de este tipo de bucles. 
10 PRINT "Este es un bucle infinito" 
20 GOTO 10 

En este ejemplo hemos utilizado dos 
de los puntos tratados en el pasado ca- 
pítulo: la numeración de líneas de 10 
en 10, y la instrucción GOTO. 

Tras haberse ejecutado la línea 10 
(aparece en la pantalla el texto entreco- 
millado), el ordenador alcanza la línea 
20. Al ejecutar esta línea recibe la or- 
den de volver a la línea 10, y así lo hace, 
volviendo a escribir el texto entrecomi- 
llado. Acto seguido llega a la línea 20, y 
vuelve a saltar a la 10. Este proceso se 
repite de forma indefinida, o bien hasta 
que apaguemos el ordenador. 

Existe una solución menos drástica 
para parar un bucle infinito que consis- 
te en pulsar la tecla STOP mientras se 
mantiene pulsada la tecla CTRL. 

Bucles finitos o con condición de fi- 
nal son, evidentemente, aquellos que 
terminan cuando se cumple alguna 
condición. Como ejemplo incluimos 
un programa que cuenta de 1 hasta 10. 
101= 1 • 
20 PRINT I 
301 = 1+1 

40 IF í <> 1 1 THEN GOTO 20 
50 END 

Este programa funciona de la si- 
guiente forma; en la línea 10 colocamos 
un 1 dentro de la variable I. La variable 
I es lo que se conoce como una variable 
contador, ya que es eso lo que hace, 
cuenta. El número 1 es el valor inicial 




que damos a ese contador (empezamos 
a contar desde 1). A este proceso se le 
denomina ¡metalización del contador. 
Es en la línea siguiente donde comien- 
za el bucle (fijaos que en la línea 40 vol- 
vemos a la 20). En primer lugar escribi- 
mos el valor de la variable I. Más tarde, 
en la línea 30, le indicamos al ordena- 
dor que le sume 1 a la variable I. De 
este modo, si contenía un 1 pasará a 
contener un 2, y si contenía un 10 (últi- 
mo número que queremos que aparez- 
ca en la pantalla) pasará a contener un 
1 1. El la línea 40 no hacemos más que 
verificar esta última condición. Mien- 
tras el número sea diferente a 1 1, volve- 
remos a la línea 20. Cuando se alcance 
este valor, no se ejecutará la parte del 
THEN (recordad que sólo se ejecuta si 
la condición se cumple, y I contiene 1 1 



y por lo tanto no puede ser diferente de 
11), con lo que el programa llegará a la 
línea 50, donde terminará su ejecución. 

La instrucción END le indica al or- 
denador que el programa ha finalizado, 
con lo que se ignoraran todas las líneas 
siguientes. En este programa de ejem- 
plo se trata de una instrucción total- 
mente superflua, ya que no hay ningu- 
na línea detrás del END; pero puede 
ayudar a ver mejor los límites del bucle. 

EJEMPLOS DE BUCLES 

Los bucles, aunque a primera vista 
tal vez no os lo parezca, son una de las 
estructuras más complejas del BASIC. 
Vamos por tanto, a insertar varios 
ejemplos de uso de bucles antes de se- 
guir con nuevas instrucciones. 
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El basic paso a paso 




Contar hacia atrás. Al igual que he- 
mos realizado un programa que cuenta 
de 1 hasta 10 podemos hacer uno que 
cuente de 10 hasta 1. 
101 = 10 
20 PRINTI 
301 = 1+1 

40 IF I <> 1 1 THEN GOTO 20 
50END 

Este ejemplo, así como el anterior- 
mente dado, son bucles con condición 
al final. Fijaos que la condición (IF) es 
la última instrucción del bucle; pero 
también podemos generar los bucles 
con condición al principio. 
101 =10 

20IFI = 0THEN GOTO 60 
30 PRINTI 
40 1 = I - 1 
50 GOTO 20 
60 END 

En este caso utilizamos una línea 
más; pero la condición de final queda 
más clara. El bucle se termina cuando I 
valeO. 

Contar de 3 en 3 desde 3 hasta 999. 

10 1=0 
20 1=1+3 
30 PRINTI 

40 IF K999 THEN GOTO 20 
50 END 

En este ejemplo hemos jugado con el 
hecho de que empezamos en el tres. En 
lugar de inicializar el contador con el 
valor 3 lo hemos hecho con el valor 0, 
de modo que podemos poner la línea 
20 (actualización del contador) antes 
que la línea 30 (cuerpo del bucle). De 
este modo simplificamos la condición 
de final (mientras I sea menor que 
999). Cuando se haya escrito el último 
número, la variable I contendrá 999, 
que no es menor que 999, por lo que se 
terminará el bucle. 

Escribir una tabla de multiplicar. En 

este .ejemplo empezamos ya a nacer tra- 
bajar a los bucles. El ordenador pre- 
guntará al usuario un número y escribi- 
rá la tabla de multiplicar correspon- 
diente a ese número. 

10 INPUT "Escribe un número 
entre 1 y 10:" ;N 

20 IFN<1 THEN GOTO 10 

30 IF N>10 THEN GOTO 10 

40 1=1 

50 PRINT N;"*";I;" = ";N*I 
60 1=1+1 

70 IFK11 THEN GOTO 50 
80 END 

En este caso el bucle es un poco más 
complicado, ¿o deberíamos decir los 
bucles? 

Tal vez no os hayáis percatado de 



Sie las líneas 10, 20 y 30 forman un bu- 
e. Este bucle se repetirá mientras el 
número entrado por el usuario (N) no 
esté entre 1 y 10. Si es muy pequeño 
volvemos a la línea 10 (volvemos a pre- 
guntar otro número), y lo mismo hace- 
mos si es muy grande. El bucle de las lí- 
neas 40 a 70 tiene una apariencia más 
afable. Sin embargo es posible que a al- 
gunos os extrañe la línea 50. Para expli- 
carla supongamos que N=5 y que 1=7. 
Esta línea le indica al ordenador que 
escriba (PRINT) el valor de la variable 
N, es decir, un 5, a continuación (el 
punto y coma separa elementos dentro 
de un mismo PRINT), ha de escribir el 
carácter '*'. Tras esto el valor de la va- 
riable I (un 7), seguido del signo '='. 
Finalmente escribirá el resultado de 
N*I (5*7=35), ya que el ordenador in- 
tenta siempre generar un resultado nu- 
mérico. 

3.3 LOS BUCLES FOR... 
NEXT 

Como hemos visto hay muchos tipos 
de bucles. En muchos de ellos actúa 
una variable contador, aunque en otros 
no. 



En los casos en que se necesita una 
variable contador, el BASIC nos ofrece 
una estructura especialmente potente. 
Son los bucles FOR... NEXT. 

Veamos el ejemplo de contar desde 1 
hasta 10. 

10 FORI=lTOl0 
20 PRINTI 
30 NEXTI 
40 END 

En este tipo de bucles, la inicializa- 
ción y la condición de final tienen lugar 
en la línea FOR. La línea NEXT indica 
únicamente el final del bucle. Sigamos 
paso a paso la ejecución de este progra- 
ma. 

La línea 10 se comporta de forma di- 
ferente dependiendo de cuándo se lle- 
gue a ella. Supongamos que el progra- 
ma acaba de comenzar. Lo primero 
que hace esta línea es inicializar el con- 
tador al valor 1 . La línea 20 escribe el 
número en la pantalla. Por último, la lí- 
nea 30 (NEXT I que en inglés significa 
SIGUIENTE I) va a buscar el siguiente 
valor de I. Si I vale 1 el siguiente valor 
es 2. La ejecución del programa conti- 
núa en la línea 10 (aunque no haya nin- 
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EJERCICIOS 



gún GOTO). Al volver a la línea 10 se 
comparara el valor de la variable conta- 
dor con el valor de final, y si se ha so- 
brepasado el valor final, se salta auto- 
máticamente a la línea siguiente al 
NEXT I. 

¿Y para contar de 3 en 3? 



?OK... NEXT nos 
permite muchos tipos de bucles. Este 
sería 

10 FORI=3T0 999STEP3 
20 PRINTI 
30 NEXT I 
40 END 

La instrucción STEP al final de la lí- 
nea FOR indica al ordenador cual es el 
siguiente I (NEXT I). Para calcular el 
siguiente I debe sumar 3 (STEP 3). 

Pero ¿al revés no puede contar? 

10 FORI=10TÓ1STEP-1 

20 PRINTI 

30 NEX I 

De esta sencilla forma podemos ha- 
cer que cuente al revés. Es ahora vues- 
tro turno para poder hacer todos los 
cambios que creáis interesantes a los 
programas de ejemplo. Y recordad, 
mientras más probéis y más os equivo- 
quéis más estáis aprendiendo. 

3.4. AVISOS IMPORTANTES 

Debéis ser capaces de entender la es- 
tructura FOR... NEXT como eso, 
como una estructura. Lo importante 
no es ni el FOR, ni el NEXT, sino las lí- 
neas que hay entre estas dos instruccio- 
nes. 

Siempre eme haya un FOR debe ha- 
ber un NEXT, ambos con la misma va- 
riable contador. 

Aunque hemos utilizado en todos 
los ejemplos la variable I como conta- 
dor, podéis utilizar cualquier otra de 
vuestra invención. Es una costumbre 
muy extendida entre los programado- 
res de todos los lenguajes el utilizar las 
variables I y J como variables contador. 

Es muy frecuente indentar (poner 
un poco más a la derecha) todas las lí- 
neas contenidas entre el FOR y el 
NEXT, de este modo se ve enseguida 
cuál es el cuerpo del bucle, aunque éste 
sea muy grande. 

No uséis la estructura FOR... NEXT 
si no estáis completamente seguros de 
que utilizamos una variable contador. 
Uno de los errores más difíciles de en- 
contrar en un programa es un error de 
estructura. Aseguráos antes de utilizar 
un FOR. 

Por último, y tal vez sea este el conse- 
jo más importante, haced todos los 
ejercicios propuestos, y otros que se os 
ocurran. La única forma de llegar a en- 
tender los bucles es haciendo progra- 
mas con bucles. 



1. - Realizar el programa de la tabla 
de multiplicar utilizando la estructura 
FOR... NEXT allí donde sea posible 
utilizarla. 

2. - Realizar un programa que calcule 
el factorial de un número. Ejemplo: 

El factorial de 7 es 1*2*3*4*5*6* 
7=5040 

3. - Realizar un programa que escriba 
las 10 tablas de multiplicar. (Este ejer- 
cicio es ligeramente complicado. To- 
máoslo con calma si no conseguís re- 
solverlo). 

4. - Realizar un programa aue haga la 
media de n números, siendo n cual- 
quier número mayor que cero entrado 
por el usuario. 



SOLUCION AL EJERCICIO 
DEL MES PASADO 

Concluíamos el capítulo del mes pa- 
sado con un solo ejercicio. Una de las 
muchas soluciones posibles es: 

En la línea 10 borramos la pantalla. 
Esta instrucción es muy utilizada al 
principio de muchos programas, ya 
que permite aue estos empiecen sin 
mezclarse con lo anteriormente escrito 
en la pantalla. 

El cuerpo del programa no tiene de- 
masiadas cosas a nacer notar. Fijaos en 
que algunos de los IF utilizan un 
GOTO para enviar el control del pro- 
grama a una zona diferente. Por ejem- 
plo si respondemos 'Willy' a la primera 

Sregunta, el programa continuará en la 
nea 300, con lo que no hará más pre- 
guntas. 

Nadie se asuste si se le queda la pan- 
talla en negro al pasar por la línea 170, 
ya que es eso lo que hacemos, poner las 
letras de color negro sobre fondo ne- 
gro. El efecto de simular que se apaga 
el ordenador es muy verosímil si se lo 
hacéis a alguien que no sepa demasiada 
informática (y que no lea la revista). 
Podéis simular (ahora que conocéis la 
instrucción FOR) una avería en el or- 
denador cambiando muy rápidamente 
el color de las letras y del fondo. 

Por último, todos los fragmentos de 
programa que habíamos dividido en 
sucesivas líneas IF confluyen en la línea 
300, donde concluye el programa. 

Notad también que la numeración 
de las líneas es totalmente libre. Como 




mos utilizar los números que queramos 
según nos convenga. 

Para calcular la medida de "n" nú- 
meros basta con sumarlos y dividir el 
resultado por n. Sólo eso. 



LISTADO 



/a ce 



ios 



el 



10 CLS 

20 INPUT "¿Cómo te llanas";N$ 

30 IF N$='Willy" THEN BOTO 200 

40 PRINT "Tu nonbre no me dice nada." 

50 PRINT "Vanos a conocernos mejor." 

60 INPUT "¿Cuál es tu edad";ED 

70 PRINT "Bien ";N$;\ Así que 

tienes" ;ED; "años. " 

80 INPUT "¿Y cuál es tu equipo de 
l«itbol";F$ 

90 IF F$="ninguna" THEN PRINT "Pccc 

deportivo le pareces tú." 

100 INPUT "¿Y cuál es tu sistema 

informático preí er i de" ; 0$ 

110 IF 0$<>"msx" THEN 150 

120 PRINT "Encantado de haberte 

conocido. " 

130 SOTO 300 . 

150 PRINT "¡Ah!, ¿Sí..-> iPues me 
apago!" 

160 INPUT "Pulsa RETURN" ; A$ 
170 COLOR 1,1 
180 60T0 300 

200 PRINT "Tu nombre me es sumamente 
familiar.' 

210 PRINT "Pero a tí no pienso 
preguntarte nada." 



300 PRINT "ADIOS" 
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Programai 



iPor Rodrigo Llopisi 



VOLUMENES 



Este interesante programa educativo os 
permite calcular el volumen de una gran 
cantidad de figuras geométricas. Gracias 
a sus interesantes gráficos queda comple- 
tamente claro el proceso de cálculo. 



li 
20 
30 

50 

60 
70 



mmmtm 

I VOLUMENES t 

I POR I 

$ RODRIGO t 

I PARA I 

t «SX-CLUB I 

mmmtm 



90 ' t $ PRESENTACION I t 
100 ' 

110 COLOR ,1,1 

120 SCREEN3 : OPEN ■ GRP : ■ ASI 1 : C0LCR9 : PSET 
( 1 6 , 2 ) : PR I NTt 1 , " VOLUMEN " : C0LQR7 : PSET ( 8 
»,40) :PRINTtl, "P0R w :C0L0R12:PSETíl6.7a 
) mm\ , "RODRIGO": COLOR10: PSET (66, 1 1 
6) : PRINTtl , "PARA" : C0L0R13: PSET (0, 154) : 
PRINTtl, "HSX-CLUB" 

130 PLAY"M400S14LBO4CEDGO5CO4GAGDEtFGA 

CCEEGGL1605CCC":F0R A=0 TO 4000: NEXT 

140 ' ELIMINAR INTERROGANTE 

150 POKE &HFDEl,tHC3 

160 POKE 4HFDE2, &HD2 

170 POKE IHFDE3,M23 

180 POKE iHFDE0,ltHFl 

190 ' VARIABLE 

200 PI=3. 14159261 

210 ' 

220 ' mmmmtmtu 

230 ' I I 
240 ' I GRAN MENU I 
250 ' t I 

260 ' tmtmmnmm 

270 ' 

280 KEY QFF:SCPEEN2,,0: COLOR,, 1: PSET (8 
8, 30), 1:C0L0R6¡ PRINTtl, "GRAN HENU B :F0R 
X=0 TO 225: S0UND2, X : SOUND?, 10: NEXT X: 
SOUND9.0 

290 PSET(B4,70), 1: COLOR 2: PRINTtl 1 . - 
MENU A n :PSET(84,90),l:PRINTtl,"2.- HE 
NU B" 

300 FOR A=2 TO 13:C0L0R A:PSET(104. 140 

):PRINTtl,"ELI6E":NEXT:A*=INKEY$:IF A$ 

<"1"0R A*>"2" THEN 300 

310 ON VAL(A$) GOTO 400,1300 

320 ' 

330 » mmmum 

340 * t t 
350 ' I MENU A I 




360 ' t I 

370 ' tmmttttm 

3B0 ' 

390 IF INKEY$="° THEN 390 

m CLS:PSET(104,0!,1:COLOR6:PRINT#1," 
MENU A" 

410 FOR X=255 TO 3 STEP - 1 : S0UND2, X : 5C 

UND9,10::NEXT:SGUND9,0 

420 COLOR2:PSET!70,30),l:PRINTti,"l.- 

Cilindro M :PSET(70,50),l:PRINTtl,"2.- C 

ilindro oblicuc":PSET(70,70),l:PRINTtl 

,"3.- Cono" 

430 PSET(70,90),iiPR!NTti,"4,- Cono ob 
licuc":PSET(70,110):PRINTtl,"5.- Dodec 
aedro":PSET(70,130),l:PRINTtl,"6.- Esf 
era":PSET(70,150),l:PRINTtl,"7.- Exaed 
ro" 

440 FOR A=2 TO 13:C0LOR A:PSET(104, 180 

) ¡PRINTtl, "ELIGE":NEXT:A$=INKEY$:IF A$ 

<"!' OR A$>"7" THEN 440 

450 CN VAL(A$) GOTO 490,610,700,810,89 

0,1050,1150 

460 ' 

470 ' t I CILINDRO * t 
480 ' 

490 SCREEN0:KEY OFF: LOCATE 14, 7: BEEP: IN 
PUT"Radio:";A:L0CATE14,14:BEEP 



500 INPL'T "Altura: ";B: SCREEN2: E I PCLE ( !0 
,20), 20,4, M l/2:CIRCLE(3f,B0!, 20,4, ,,1 

á 

513 DRAWC4; BM10, 20D60BM50, 20D60" 

520 COLOR 6:DRArBH58,20D25BM58,55D25 n 

:PSET(56.46í:PRINT*l, n h" 

530 DRAWBK30, B0R20" : PSET (30. 70) : PRINT 

11. V 

540 PSET(100,60):PPINTI1, H V = irtr*2lh" 
¡COLOR 7 

550 DRAWBM92.52R104D24L104U24 n :COLOR 
2:PSET(10,140) 

560 PRINTtl, "V = n Prt"A" A 2í"B"":CCL0R 
13:PSET(10,160):PRINTtl, n V = ":PSET(34 
,160),l:BEEP¡PRINTti,PIIA A 2IB 
570 GGSUB 2480 
580 ' 

590 » II CILINDRO OBLICUO I I 
600 ' 

610 SCREEN0:LOCATE14,7:BEEP:INPUT"Radi 

o:";A:L0CATE14,14:BEEP:INPUT"Atura:";B 

620 SCREEN2:CIRCLE(39,20),20,4,,,1/2:C 

IRCLE(30,B0), 20,4,, ,1/2 

630 LINE(19,20)-(10,80),4:LINE(59,20)- 

(50,80),4:COLOR6:LINE(39,20)-(59,20) 

640 PSET(39,10):PRINTtl,"r":LINE(69,20 

)-(69,44):PSET(67,46):PRINTil,-h M 
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650 LINE(69,54M69.80) 
660 SOTO 540 
670 ' 

680 » VÍ CONO * t 
690 ' 

700 SCREEN0: L0CATE14, 7:BEEP: INPUT"Radi 
o: A: L0CATE14, 14: BEEP: INPUT F A1 tura: " ; 
B 

710 SCREEN2: CIRCLE (30, 80) , 20, 4, , , 1/2: L 
INE(30,20)-(50,80),4:LINE(30,20)-(10,8 
0),4 

720 COLOR 6:LINE(30,B0)-(50,B0):PSET(3 
0,70):PRINTtl,'r":LINE(60,20)-(60,44) 
730 PSET(5B,45) ¡PRINTil, V:LINE(60,54 

¡-(60,80) 

740 PSET(100,60):PRINTIl, n V = l/3*ir*r A 

2lh":DRAW"C7;BM92,52R136D24L136U24 n 

750 COLOR 2:PSET(10,140):PRINTtl,"V = 

l/3rpI»t"A" A 2rB"":C0L0R I3 

760 PSET (10, 160) sPRINTil , " V = ":PSET¡3 

4,160),l:BEEP:PRINTtl,PI»13tA A 2tB 

770 GOSUB 2480 

7B0 ' 

790 ' * $ CONO OBLICUO t t 
800 ' 

B10 SCREEN0:KEY OFF: LDCATE14, 7: BEEP: IN 

PUT"Radio:";A:L0CATE14,14:BEEP 

823 INPUT'Altur a: " ; B: SCREEN2: CIRCLE (30 

,B0Í,20,4,,,1/2:LINE(50,20)-(10,78),4 

B30 LINE(50,20)-(50.80),4;LINE<60.20)- 

( 60 , 44 ? , 6 : C0L0R6 : PSET ( 58 , 45 ) : PR I NT# 1 , " 

h":LINE(60,54)-(60,80),6:LINE(30,B0)-( 

50.80!, 6:PSET(30,71),1:PRINTI1,V:GOT 

740 

840 LINE(60,54)-(60,80),6:LINE(30,B0)- 
(50.80), 6:PSET(30,69),1:PRINT»1,V 
850 GOTO 740 
860 ' 

870 ' I * DODECAEDRO t * 
880 ' 

890 SCREEN0:KEY OFF: L0CATE14, 1 1 : BEEP: I 
NPUT" Arista:"; A 

900 SCREEN2: COLOR 4: LINE (23. 30) - (43, 30 

):LINE(23,30)-(18,55) 

910 LINE(18,55)-(33,70):LINE(43,30)-(4 

8,55):LINE(48,55)-(33,70),6 

920 LINE(23,30)-(20,23):LINE(43,30)-(4 

6,23):LINE(20,23)-(33,19) 

930 LINE(46,23)-(33,19):LINE(18,55)-(1 

0,59):LINE(10,59)-(10,40) 

940 LINE(10,40)-(20,23):LINE(48,55)-(5 

6,59):LINE(56,59)-(56,40) 

950 LINE(56,40)-(46,23):LINE(33,70)-(3 

3,B0):LINE(33,82)-(17,73) 

960 LINE(17,73)-(10,59):LINE(33,82)-(4 

?,73):LINE(49,73)-(56,59) 

970 PSET (36, 53), 1: COLOR 6:PRINTil,V 

980 PSET(100,60),1:COLOR 6:PRINT*1,"V 

= a A 3/4t ( 15+7U5) " : DRAH"C7; BM92, 52R168 



D24L168U24" 

990 COLOR 2:PSET(10,140):PRINT*1."V =" 

;A;" A 3/4t(15+7U5)":C0L0R 13 

1000 PSET(10,160):PRINTI1,'V = ":PSET( 

34,160),l:PRINTfl,A A 3/4t(15+7tSQR(5)) 

1010 GOSUB 2480 

1020 ' 

1030 ' t t ESFERA t t 
1040 ' 

1050 SCREEN0:LOCATE14, 10: BEEP: INPUT"Ra 
dio: "¡A 

1060 SCREEN2: CIRCLE (40, 60) , 30, 4, , , 1 . 3/ 

1 : C IRCLE (40, 60) , 23, 4, , , . 25/1 

1070 LINE(40,60)-(54,84),6:PSET(41,73) 

,l:PRINT*l,"r":DRAITC7;BH92,52R120ü24L 

120U24" 

1080 COLOR 6:PSET(100,60):PRINTil,"V = 
4/3titlr A 3" 

1090 COLOR 2: PSET ( 10, 140) : PRINTf 1 , - V = 
4/3» n Pr» , A" A 3' 

1100 COLOR 13:PSET(10,160):PR1NT*1,"V 
= ":PSET(34,160),l:PRINTtl,PIt4/3»A A 3 
1110 GOSUB 2500 
1120 ' 

1130 ' t I EXAEDRO í t 
1140 ' 

1150 SCREEN0:L3CATE14,10:BEEP:INPUT n Ar 
ista:";A 

1160 SCREEN2:LINEÍ10,40)-(50,95!,4.B:L 

INE(30,20)-(70,75),4,B 

1170 LINE(50.40)-(70.20).6:PSET!5:.26) 

,l:COLOR 6:PRINTtl,V 

1180 LINE(10,40)-(30.20).4:LINE(50.95) 

-(70,75).4:LINE(10.95)-(30,75),4 

1190 DRAirC7;BM92,52R72D24L72U24":C0L0 

R6: PSET í 100, 60) : PRINTil , "V = a A 3" 

1200 COLOR 2:PSET(10.140):PRINT#l. n V * 

"A" A 3" 

1210 COLOR 13: PSET ( 10, 160) : PRINTil , * V 
= ":PSET(34,160).l:PRINTil,A A 3 
1220 GOSUB 2480 
1230 ' 

1240 ' tmtmmm 

1250 » t t 
1260 ' * MENU B * 
1270 > t t 

1280 ' mmttmm 

1290 ' 

1300 CLS:PSET(!04,0):COLOR 6: PRINTil," 
MENU B": COLOR 2 

1310 FOR X=255 TO0 STEP- 1 : S0UND2, X : SOU 

ND9,10:NEXT:SOUND9,0 

1320 PSET (70, 3i) , 1 8 PRINTil , a i . - Icosae 

dro" 

1330 PSET (70, 50) , 1 : PRINTil , "2- - Octaed 
ro" 

1340 PSET(70,70),l:PRINTil,'3.- Parale 
lepípedo" 

1350 PSET (70,?0),1:PRINT#1,"4.- Pirámi 



de" 

1360 PSET(70,110):PRINT»1,"5.- Firámid 
e oblicua" 

1370 PSET (71, 130) , 1: PRINTil , "6.- Prisi» 
a" 

1380 PSET ( 70 , 150 ) : PR INT# 1 , - 7 . - Tetraed 
ro" 

1390 FOR A=2T013: COLOR A: PSET (104,184) 
1400 PRINTil , **ELIGE":NEXT: A$=INKEYt 
1410 IF AKT OR A$>"7" THEN 1390 
1420 ON VAL(A$) 60TO 1460,1650,1810,19 
50,2100,2200,2370 
1430 ' 

1440 ' * * ICOSAEDRO t t 
1450 ' 

1460 SCREEN0: LCCATE14, 10: BEEP: INPUT"Ar 
ista: ";A 

1470 SCREEN2:C0L0R 4: LINE ( 10. 33 ) - ( 10, 7 

5):LINE(62,33)-(62,75) 

1480 LINE(10,33)-!37,15):LINE(62,33)-( 

37.15) 

1490 LINE(10.75)-(36,93):LINE(62,75;-( 
36,93) 

1500 LINE(10,75)-(37,80):LINE(62,75)-( 
37,80) 

1510 LINE(37,80)-(37,93):LINE(20,40)-( 
52. 40), 6 

1520 LINE(20.40)-(10,33):LINE(52,40)-( 
62,33) 

1530 LINE(20,40)-(37,15):LINE(52,40)-( 
37,15) 

1540 LINE(20,40)-(10,75):LINE(52,40)-( 
¿2,75) 

1550 LINE(20,40)-(37,80):LINE(52,40)-( 
37,80) 

1560 COLOR 6:PSET(34,31),l:PRINTil,V 
1570 PSET ( 100, 60) : PRINTil , "V = 5ta A 3/l 
2*3*^5" 

1580 DRArC7;BM92,52R152D24L152U24 
1590 COLOR 2:PSET(10,140):PRINTil,"V = 
5t"A" A 3/12t3U5":CQL0R 13 
1600 PSET (10, 160) : PRINTil , »V = ":PSET( 
34,160),l:PRINTIl,5tA A 3/12t3ISQR(5) 
1610 GOSUB 2480 
1620 ' 

1630 ' t I OCTAEDRO I t 
1640 ' 

1650 SCREEN0:LOCATE14, 10: BEEP: INPUT'Ar 
ista:";A 

1660 SCREEN2:C0L0R 4: LINE ( 10, 55) - (40, 5 

5>:LINE(30,B0)-(10,53) 

1670 LINE(30,80)-(40,55)iLINE(50,50)-( 

40,55) 

1680 LINE(5#,50)-(30,80):LINE(30,20)-( 
10,55) 

1690 LINE(3«,20)-(40,55):LINE(25,50)-( 
10,55) 

1700 LINE(25,50)-(50,50):LINE(30,20)-( 
25,50):LINE(25,50)-(30,B0) 
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tASCm!0»fPt..|,l))-6«)oeTHCN «5 




CON GARANTIA 




1710 LINE«25,30)-(30,B0) :CDL0R 6:LINE( 
50,S0)-Í30,20) 

1720 PSET(44,30) , 1 : PRINTil , "a" : PSET í 10 

0. 60) :PRINTtl, "V = a A 3/3N2" 
1730 LINE(30,20)-<50,50) 

1^40 C0L0R7: DRAW"BK92, 52R1 12D24L1 12U24 
1750 COLOR 2íP8ET(il,l«)lPRIÑT#l f "V = 

1760 COLOR 13:PSET(10,160):PPINTIi,'V 
= n :PSET(34,160y.:PRINTIl,A A 3/3tSQR(2 
) 

1770 GOSUB 2*80 
1760 ' 

1790 ' t » PARALELEPIPEDO t t 
1800 ' 

1810 SCREEN0 : LOCATE 1 4 , 6 : BEEP : INPÜ"- " Ar i 
sta 1; A 

1820 LBCATE14, 12: BEEPl IHPUT'Ar iita Z: n 
¡ B; LDCATE14, 18>BEEP: INP'JT'Ari sta 3: C 

1830 screen2; line (30, 201 -(30,652 , 4, 3: l 

;ne::M0)-;60,3?¡,4,b 

1340 line(30,23)-:10,40:,4:line(30,65 1 

-:i0,85),4 

1850 LINEí30,65)-í60,85),4 

1360 CCLOR 6:DRAW B B«30,20R50D45":L:NE' 

80,20)-íó0,40í 1FSETÍ52, 12) , 1 

i E?0 PR I NTf 1 , " a 1" : PSET ( 85 , 40 ) , 1 : PRINTI 

1, n a2 r :PSET(52,26), IzPRINTil^aS" 
1380 PSET(120,60):PR:NTfil/V = &ltl2Ji 
3":DRAW"C7;BM:i2,52R112D24Lil2U24" 
ifff COLOR 2iPSET(10,140):PRINTtl,-V = 
"ATB'TC"" 

1900 CCLOR 13:FSET(10,160;:PRINT»1,"V 
= B :PSET(34,160),l:PRINTi:,A»BIC 
1910 GOSUB 2480 
1920 ' 

1930 ' * * PIRAMIDE * I 
1940 ' 

1950 SCREEN0:LOCATE10,7:BEEP:INPUT ,, Sup 
erficie base: A:LQCATE14, 14 
1960 BEEP:INPUT"Altura:";B:SCREEN2 
1970 COLOR4:DRAW"BM25,65R35BM10,80R35" 
1980 LINE(10,B0)-(25,65):LINE(45,B0)-( 
60,65) 

1990 LINE(25,65)-(33,20):LINE<60,65)-( 
35,20) 

2000 LINE(10,80)-(35,20):LlNE(45,80)-( 
35,20) 

2010 COLOR 6:DRAWBH65,20D21BH65,32D21 
":PSET(63,42):PRINTIl,'h" 
2020 PSET í 27, 68) , 1 : PRINTil . "Sb " : PSET ( 1 
00,60)!PRINTtl,'V = l/3$Sbth' 
2030 DRAW"C7;BM92,52R112D24L112U24" 
2040 COLOR 2:PSET(10, 140) : PRINTtl , " V ■ 
l/3t"A"t"B M 

2050 COLOR 13:PSET(10,160):PRINT»1,"V 



= ":PSET(34,160),l:PRINTIl,l/3tAIB 
2060 GOSUB 2480 
2070 ' 

2080 ' * t PIRAMIDE OBLICUA t * 
2090 ' 

2100 SEREEN04 LOCATE 1 0, 7 : BEEPi INPUT " Sup 

iMicis base: " ; A: L0CATE14, 14 

2110 BEEF: INPL'T n Al tura: " ;B 

2120 SCREEN2: COLOR 4: DRAW"BM25, 64R35BK 

10,80R35BM45,20D60" 

2130 LINE!25,65)-(10,80):LINE(60,65)-( 
45,80) 

2140 LINE(45,20)-!60,65):LINE(45,20)-{ 
25,65) 

2150 LINE(45,20)-(10 Í 30: 
2160 6QT.Q 2010 
2170 ' 

2180 ' % t PRISMA i * 
2190 ' 

2200 3CREEN0 : LOCATE 1 , 7 : BEEF : I NP'JT " Sup 

erficie base: " ; A: L0CATE14, 14 

2210 BEEF:INF'JT"Altura: n ;B 

2220 SCREEN2: COLOR 4:DRAWBM10,25D45BM 

30,35D45BM50,25Ü45BM17,20R26BM17,65R26 

BM1',20D45BM43,20D45" 

2230 LINE (17, 20) - (10, 23) : LINE (43, 20) - { 

50.25) 

2240 LINE(10,25)-(33,35);LINE(50,25>-( 
30,35) 

2250 LINE(17,65)-(10,70):LINE(43,65)-( 
50,^0) 

2260 LINE(10,70)-(30,30):LINE(50,70)-( 
30,30) 

2270 COLOR 6:FSET(100,60):PRINT#1,"V = 
Sbth?:DRAW"C7;B?1?2,52R80D24L80U24" 
2230 PSET'.37 f 44}:PRINTIl,V 
2290 PSET!45,75),l:PRINTIl, n Sb n 
2300 DRAWBM60,25D1BBM60, 54017" 
2310 COLOR 2:PSET(10,140):PRINTtl,"V = 
»A"t"B" 

2320 COLOR l3:PSET(10,160)tPR!NTtl,"V 
= •:PSET(34, 160) , 1 : PRINTil , AtB 
2330 GOSUB 2480 
2340 ' 

2350 ' I t TERAEDRO I t 
2360 ' 

2370 SCREEN0:LOCATE14, 10: BEEP: INPUT" Ar 
ista:";A 

2380 SCREEN2:COLQR4:DRAW"BM10,80R46":L 

INE (56,80)-(33,20) 

2390 LINE(33,20)-(10,80) 

2400 LINE(33,60)-(10,80) 

2410 LINE(33,60)-(56,80) 

2420 LINE(33,60)-(33,20) 

2430 COLOR 6:LINE(56,80)-(33,20):PSET( 

51,47),l:PRINTil,-a- 



POR SOLO 800 PTAS. 




2440 PSET(100 f 60) :FRINT#l f -V = a A 3/12l 

;2":DRAK'C7;BK92,52R120I524L120L»24" 

2450 COLOR 2:PSET:i0,140):PRINT*i,"V = 

"A" A 3/12«2":C0L0R 13 

2460 PSET(10,1¿0) :PRINTIi,*V = ".•PSET! 

34,160), l:PR!NTIl,(A A 3)/12tSQR(2) 

2470 GOSUB 2480 

2460 ' SlIBRUTINfi DE RETORNO Y FIN 
2490 'FCR X=8 TO 9: FCR Y=72 *C.73:F0R 

W52 ra 153 

2500 COLOR 15:F0R X=3 TO 9:PSET(X, 134! 
¡PfilNítl, "Pulía; - 1ENL' - TER'IN 
AR n :NEXT X 
2510 POR A=2 TG 13 

2520 COLOR A:FOR Y-72 TO 73íPS£T(Y,iB4 

líPF.INTIi.'fí'iNEXT Y 

2530 FOR Z=152 TO í«3iPSET ti, 184) iPRIN 

T# 1 , r T" : NEXT Z 

2540 NEXT A 

2550 A$=INKEv$ 

2560 IF A$= n " THEN 2510 

2570 IF A$="H" OR A$=V THEN GOTO 2S0 

2580 IF A$="T" OR A$="t" THEN 2600 

2590 IF A*Of" OR «*<}"!" T HEN 2510 

2600 FOF: A=0 TO 255 STEF.5:SC'JND0,A:SG 

UNOa,10:NEX7¡F6R M9 TC STE P -.5;30U 

NDB, I: NEXT; LINE Í0. 10) - (255, 1921 , 1 , 3F 



Test de listados i 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa correspon- 
diente publicado en nuestro número 7 del mes de noviembre, pág. 28. 



10 - 58 
20 - 5B 
30 - 58 
40 - 58 
50 - 58 
60 - 58 
70 - 58 
80 - 58 
90 - 58 
100 - 58 
110 - 57 
120 - 67 
130 - 71 
140 - 58 
150 -125 
160 -141 
170 -223 
180 -170 
190 - 58 
200 -217 
210 - 58 
220 - 58 
230 - 58 
- 58 



250 - 58 
260 - 5B 
270 - 58 
280 -242 
290 -168 
300 -238 
310 - 89 
320 - 58 
330 - 58 
340 - 58 
350 - 58 
360 - 58 
370 - 58 
380 - 58 
390 - 25 
400 -210 
410 -223 
420 -146 
430 - 90 
440 -167 
450 - 40 
460 - 58 
470 - 58 
480 - 5, 



490 - 78 
500 - 23 
510 - 8 
520 - B7 
530 - 25 
540 -176 
550 -243 
560 -179 
570 - B4 
580 - 5B 
590 - 58 
600 - 58 
610 - 20 
620 -253 
630 -101 
640 - 43 
650 -231 
660 -181 
670 - 58 
680 - 58 
690 - 58 
700 -12B 
710 -232 



730 -171 
740 - 19 
750 -156 
760 -224 
770 - 84 
780 - 5B 
790 - 58 
800 - 58 
810 - 78 
820 - 23 
830 - 57 
B40 -118 
850 -125 
860 - 58 
870 - 5B 
880 - 58 
890 - 83 
900 - 2 
910 -106 
920 - 70 
930 -119 
940 - 3 
950 - 67 
960 -114 



970 


-211 


1210 


- 42 


1450 


- 58 


980 


— 


1220 


- 84 


1460 


- 97 


990 


-159 


1230 


- 58 


1470 


-110 


1000 


-107 


1240 


- 58 


1480 


-218 


1010 


- B4 


1250 


- 58 


1490 


-200 


1020 


- 58 


1260 


- 58 


1500 


-176 


1030 


- 58 


1270 


- 58 


1510 


-1B6 


1040 


- 58 


1280 


- 58 


1520 


- 10 


1050 


-236 


1290 


- 58 


1530 


-232 


1060 


- 92 


1300 


-159 


1540 


- 94 


1070 


-216 


1310 


-165 


1550 


-106 


1080 


- 


1320 


-148 


1560 


-187 


1090 


-221 


1330 


- 65 


1570 


-154 


1100 


-198 


1340 


- 4 


1580 


- 85 


1110 


-104 


1350 


-164 


1590 


-209 


1120 


- 58 


1360 


- 90 


1600 


- 22 


1130 


- 58 


1370 


-20B 


1610 


- 84 


1140 


- 58 


1380 


-229 


1620 


- 58 


1150 


- 97 


1390 


-169 


1630 


- 58 


1160 


-222 


1400 


-211 


1640 


- 58 


1170 


-208 


1410 


-117 


1650 


- 97 


1180 


- 20 


1420 


-231 


1660 


- 85 


1190 


- 83 


1430 


- 58 


1670 


-120 




1690 


- 5 


1930 


- 56 


2170 


- 58 


ÍAÍi 


-188 


1700 




1940 


- 5B 


2180 


- 58 


2420 


-105 


1710 


- 69 


1950 


- 26 


2190 


- 58 


2*30 


-170 


1720 


-155 


1960 


-245 


2200 


- 26 


2440 


-130 


1730 


-109 


1970 


-147 


2210 


-227 


2450 


- 18 


1740 


-167 


1980 


-150 


2220 


-161 


2460 


- 84 


1750 


-207 


1*90 


- 45 


2230 


-186 


2470 


- B4 


1760 


- 15 


2000 


- 45 


2240 


-216 


2480 


- 58 


1770 


- 84 


2010 


- 75 


2250 


-110 


2*90 


- 58 


1780 


- 58 


2020 


- 93 


2260 


-140 


2500 


- 55 


1790 


- 58 


2030 


-111 


2270 


-166 


2510 


-186 


1800 


- 58 


2040 


-242 


2280 


-154 


2520 


-246 


1810 


-144 


2050 


- 99 


2290 


- 56 


2530 


-104 


1B20 


- 78 


2060 


- 84 


2300 


-109 


2540 


-196 


1830 


-222 


2070 


- 58 


2310 


- 53 


2550 


- 64 


1840 
. 1850 


-140 
- 58 


2080 


- 58 


2320 


- 86 


2560 


-226 


2090 


- 58 


2330 


- 84 


2570 


-246 


1860 


-226 


2100 


- 26 


2340 


- 5B 


2580 


-14B 


1870 


- 68 


2110 


-227 


2350 


- 58 


2590 


-240 


1880 
1890 


-243 


2120 


-212 


2360 


- 58 


2600 


- 51 


-230 


2130 


-150 


2370 


- 97 






1900 


-140 


2140 


- 65 


2380 


- 46 






1910 


- 84 


2150 


-114 


2390 


-102 


TOTAL: 


1920 


- 5B 


2160 


-120 


2400 


-142 


27789 
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rama 



iPor Pau Frías y Jordi Faraudoi 



Diversos gráficos resultado 
de ecuaciones matemáticas 
se os presentan en la pantalla 
por medio de este programa. 




10 'ttmitmmtmtmmm 

21 '$ Programa de grificos I 
30 t ideado por Pau Frías t 
40 'tVersión MSX->Jordi Faraudo 
50 '< Para «SX-Club t 

60 'tmmmtmtmmttmt 

70 FORX=50000 ! TO50 1 08 ! : READVI : POKEX, VA 

80 S*S+VAL("iH'+V$):NEn 
90 IFS< > 1Í855THENCLS : BEEP : PR INT " HAY UN 
ERROR DE TECLEO/CARGA EN LINEAS DATA" 
100 DATADD,21,40,9C,21,40,6,6,C,C5,6,2 
0,E,4,CD,4A,0,F5,CD,AC,C3,DD,77,B,DD,7 
7,9,F1,CB,3F,CB,3F,CB,3F,CB,3F,CD,AC,C 
3,DD, 77,0,00,77,1, 23, DD, 23, DD, 23, D, 20, 
D9,CB,40,ll,FB,0,28,3,U,B,FF,OO,t9,10 
,C9,11, 80,0,19,11, 0,1, DD,19,C1,10,BA,1 
,0.18,11 

110 DATA0,0,21.40,9C,CD,5C,0,C9,1E,4.5 
7 .EB,3F,CB,3F,CB,3A,30,2,F6,C0,1D,20,F 

3,C9 

120 OPEN"6RP:"AS1:DEFUSR=50000! 

130 SCREEN2: COLOR 15,1,15:CLS 

140 5OSUB180: GOSUB1Ó0: GQSUB290: GOSUBIi 

0: GOSUB310; GOSUB160: GOSUB370: GOSUB160 

150 5OSUB380:GOSUB160:GOSUB390:GOSUB16 

0:EKO 

160 FORX=0TO7:A=USR(0):NEXT 
:70 RETURN 
180 'Dibujo 12 

190 DIHA(12):DI*!P:i2):PI=3. 1415921 



200 FORN=1TO12:K=N/6JPI:A(N)=128+80«SI 

N(K):B(N)=8B+80tCOS(K) 

210 PSET(A(N),B(N)):NEXTN 

220 F0RN=1T012:F0RH=1T012 

230 0X=A(H)-A(N):0Y=B(H)-B(N) 

240 PSET(A(N),B(N)J:LINE-STEP(0X,0Y) 

250 NEXTM: NEXTN 

260 RETURN 

270 'Dibujo 22 

280 SCREEN2: C0L0R15, 1 , 15: CLS: FORF=0TO2 

000STEP20:PSET(127,B7) 

290 LINE-STEP(0+100ICOS(F),0+50tSIN(F) 

300 NEXTF: RETURN 

310 'Dibujo 32 

320 SCREEN2:FORF=0TO20STEP.l 

330 A=C0S(F)-(RND(-TINE)!3. 1415921/6) 

340 PSET ( 107+50ICOS (F) , 70+25ISIN ( F) ) 

350 LINE-STEP(0+100tCOS(A),0+25ISIN(F) 

): NEXTF: RETURN 

360 'Noibres de los autores 



370 SCREEN2: C0L0R15, 1 , 15: CLS: PSET ( 105 , 
88),l:PRINTIl,"(c) By 1 : RETURN 
380 PSET í 105, 88) , 1 : PRINTt 1 . "Pau Frías" 
: RETURN 

390 PSET ( 97, 92) , 1 : PRINTI1 , " J . Faraudo" : 
RETURN 



Test de listados 



10 


- 58 


120 


- 43 


230 


-203 


340 -128 


20 


- 58 


130 


- 78 


240 


-131 


350 -134 


30 


- 58 


140 


- 79 


250 


-219 


360 - 58 


40 


- 58 


150 


-141 


260 


-142 


370 -139 


50 


- 58 


160 


- 49 


270 


- 58 


380 -231 


¿0 


- 58 


170 


-142 


280 


-136 


390 -202 


70 


-123 


180 


- 58 


290 


-217 




80 


- ¿8 


190 


-142 


300 


-145 




90 


- 53 


200 


-248 


310 


- 58 




100 


-178 


210 


- 11 


320 


- 31 


TOTAL: 


110 


-121 


220 


-195 


330 


- 31 


4340 




ENTRA EN LA AVENTURA 
CORRE A TODA PASTILLA 
CON 



} mdífm 



OTRO SENSACIONAL LJ JUEGO DE MANHATTAN TRANSFER , S.A. 



Programa 



iPor Juan Pedrajai 



CALEIDOSCOPIO 



Con este programa podréis 
simular un hermoso calei- 
doscopio, realizando múlti- 
ples figuras en la pantalla en 
dos resoluciones diferentes. 



10 REHUI! CALEIDOSCOPIO HSX tíí 
20 REHUIS POR JUAN PEDRAJA Ittl 
30 REHtttt TORRELAVEGA 1987 tttt 
40 ' 

50 REHtttttPRESENTACION Y HENUtm* 
60 POKE WFCAB,l:OPEN'grp:'ASIl 
70 COLOR 15,1,1:SCREEN 2 
80 PRESET(60,20):PRINTtl,"CALEIDOSCOPI 
HSX" 

90 LINE(54,14}-(200.32)„B 

100 PRESET ( 53 . 60 ) : PR I NTt l , " ALTA RESOLU 

CION 

110 PRESET (53, 85) : PR INTtl 9 "BAJA RESOLU 
CION -2-' 

120 A$=INK.EY$:IFA$<)"2 n AND A$<>'i" TH 

EN 120 

130 IF A$="2" THEN SC=3 ELSE SC=2 
140 PRESET (78, 110): PRINTI1 , "COLORES (S 

m* 

150 PRESET (38, 150) : PRINT01 , "VOLVER A E 
3TE HENU..-M-" 

160 PRESET (38, 165) : PRINT#1 , "OTRO DIB'JJ 
C... -ESPACIO-" 



170 LINE(34,146)-(221,175),,B 

1B0 A$=INKEY$:IFA$<>"N" AND A$<>"S" TH 

EN 180 

190 If «••3" THEN CL=16:DE=0 ELSE CL 
=1: DE* i 

200" Rf mtCALCULO DE PARAMETROS*»!» 

210 E ;95:E1=EM:WH=ET:A=2 

220 f .REEN SC:A=1 

230 .1=1:Y1=1:X2=1:Y2=1 

240 Y1=-Y1:Y2=-Y2:G0SUB 340:X1=-X1:X2= 

-X2:G0SUB 340 

250 Y1=-Y1:Y2=-Y2:G0SUB 340:X1=-X1:X2= 
-X2:G0SUB 340 

260 IF RND(-TIME) »A>1 THEN 300 

270 Vl=INT(RND(-TIHE)>ll+.5)-5:V2=INT( 

RND(-Tlt1E)tll+.5)-5 

280 V3=INT(RND(-TIHE)lll+.5)-5:V4=INT( 

RND(-TIME) »ll+.5)-5 

290 C=INT(RND(l)tCL)+DE:A=10 

300 H=X1+V1:X1=H-INT(H/E1)!EI:H=Y1+V2: 

Y1=H-INT(H/E1)$E1 

310 H=X2+V3:X2=H-INT(H/E1)»E1:H=Y2+V4: 
Y2=H-INT(H/El)tEl 



320 GOTO 240 

330 REMtmtSUBRUTINA DE DIBUJO»»»»» 

340 L!NE(Xl+WH+37,Yl+El)-(X2+WH+37. Y2+ 
ET),C 

350 A$=INKEY$:IFA$<>" " AND A$<>"H" TH 
EN 370 

360 IF A$="H" THEN 70 ELSE 210 

370 LINE(Y1+HH*37,X1+ET)-(Y2+KH+37,X2* 

ET).C 

380 RETURN 



Test de listados 



10 - ^ 110 -245 

20 " 120 -204 

30 " 130 - 59 

40 - 58 140 -194 

50 - 150 - 18 

60 " 3 U0 -130 

70 -105 170 -177 

80 -212 180 - 70 

90 -125 190 -235 

100 -239 200 - 



210 - 15 
220 -215 
230 -218 
240 -214 
250 -214 
260 -105 
270 - 98 
280 -100 
290 -112 
300 -101 



310 -109 
320 -135 
330 - 
340 -141 

350 -177 
360 -158 
370 -176 
380 -142 
TOTAL: 
. 4504 



SUSCRIBETE A 

Suscribiéndote no sólo tienes la seguridad de tener todos los meses tu 
MSX CLUB DE PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 




Deseo suscribirme por doce números a la revista MSXCLUB DE PROGRAMAS a partir del número 

que pago adjuntando talón a la orden de: MANHATTAN TRANSFER, S.A. - C/f Roca i Batlle, 10-12 - 08023 Barcelona 

Tarifas: España por correo normal Ptas. 2.250, — 

Europa por correo normal Ptas. 2.600 — 

Europa por correo aéreo Ptas. 3.250,— 

América por correo aéreo USA$ 35USAS 

Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 
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Programa 



por José L. Guerra 



COCHES 



Estamos ante un juego muy 
sencillo pero la velocidad de eje- 
cución es capaz de poner a prue- 
ba hasta el jugador de más rápi- 
dos reflejos. 



10 SC*EEN 1 : KEY 0FF:C0L0P 1, 12, i2iDEFI 
NT I 

20 MIDTH 32 

30 FOP I=!2P0 TO 1207 

40 PEAD S 

50 VPOKE 1,0 

60 NEXT 

71 FOP 1=800 TC 839 
80 PEAD Q 
"0 VPWE I.Q 
100 VPOKE I+B00.Q 
111 NEXT 

120 FDP!=912 TO 919 
130 PEAD Q 
140 VPOKE 1,3 
m NEXT 

16? FOP 1=1840 TQ 1B47 
m REftfi Q 
130 VPOKE I,Q 
190 TOE 1+16, Q 
200 NEXT 

210 "INNUMERO DE JUGADORES (1,2) :" 
i 

220 ftf=INPy?Í(t):!F A$<>"1" AND M<>'2 
■ THEN 220 

230 IF THEN JU=1 ELSE JU=2 

240 LCCATE 0,0: p P!NT J'J: "JUGADORES" : SP 
C(20) 

250 PIN t : c ^INT"VELOC:DAD(1-5) , 5 

261 A$=IÑPL'T$(1!:IF M<»1" AND A$>"5" 

THEN 260 

270 VE=VAL(A$) 

280 ! c VEO 0R VE>3 THEN 250 

290 LOCATE 0, 1:PRINT"VEL0CIDAD=';VE 

300 PR!NTSPC(25> 

310 PRINT: INPUT "NUMERO DE PARTIDAS" ;N 

U 

320 IF Nü<i THEN 310 

330 LOCATE 0,2:PRINTNU B PARTIDAS n 

340 PRINTSPC(30) 

350 PRINT:PRINT"C0N SIN OBSTACULOS ? 

360 C0$=INPUT$(1):IF COfO'C" AND COK 
>"S" THEN 360 

370 IF CM»"C" THEN 00»! ELSE CO=0:*RI 
NT 







380 LOC A T E Í.4:PRIST8PCni) 

3"? IF tím T KEN LCCATE 0.3iPR!NT"CON 

OBSTACULOS" 

400 IF CO=0 TREN LOCATE 0,3:P9INT"SIN 
OBSTACULOS" 

410 IF C0=1 THEN PRINT: INPUT n CL'ANT0S : 
" ; CU : LOCATE0. 4: PRINTCU'OBSTACULOS" : PR 
INTSPCÍ20) 

420 LOCATE0, 4: PRINTCU'OBSTACULOS" ¡ PRIN 
TSPCI20) 

430 PRINT:PRINT"CON SIN ESTRELLAS ? 
" ! 

440 CL$=1NPUT$(1):IF CLKW AND CL*< 
>"3" THEN 440 

450 IF CL$="C" THEN FL«1 ELSE FL*0:PRI 
NT: SOTO 560 

460 LOCATE 0,5:PRINT"CON ESTRELLAS" :PR 
INTSPC(30) 

470 PRINT: INPUT 'CUANTAS :":FK 







480 LCCATE 0.6:PRINT^"ESTRELLAS»:PPJN 
TSPC(30) 

490 PPINT:'PRINT"FINALIZANDO UNA VEZ RE 
COGIDAS 

500 CL$=INPUT$(1):IF CL$<>"S" AND CL$< 
>"N" THEN 500 

510 IF CL$="S n THEN FI=1 ELSE FI=0 
520 LOCATE 0, 8: PRINTSPC (32) 
530 IF Fí«l THEN LOCATE 0,7:PRINT"FINA 
L IZANDO" 

540 IF FI=0 THEN 580 
550 GOTO 590 

560 LOCATE0.5:PPINT"SIN ESTRELLAS" 
570 LOCATE0,6:PRINT"0 ESTRELLAS" :SPC (2 
0) 

580 LOCATE0.7:PRINT"SIN FINALIZAR" 
590 PRINT: PRINT" JUGADOR 1, JOYSTICK 
CURSOR ?" 

600 A$=INPUT$(1):IF NOT A$="J" AND NOT 
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A$= H C" THEN 600 

610 IF A$=T THEN J0=1 ELSE JO=0 * 
620 LOCATE 0, 9: PRINTSPC (30) 
630 IF J0=1 THEN LOCATE 0, B:PRINT" JUGA 
m ! JOYSTICK" 

640 IF JO=0 THEN LOCATE 0, B : PR INT" JUGA 
DDR 1 CURSOR" 

650 PPINT: PRINT" JUGADOR DOS CON LAS TE 
CLflSs" 

660 IF JU=2 THEN LOCATE 0, 12: PRINT"SUE 
IR ";:GOSUB 810 

670 LOCATE 0. 9: PR INT" JUGADOR 2:" 

680 LOCATE 0, 10: PRINTSPC í 30) 

69? LOCATE 0, 10:PRINT"SUBIR ";N$(1) 

m LOCATE 0.12:PRINTSPC(30) 

710 IF JU=2 THEN LOCATE 0. 12:PPINT"BAJ 

AR "ííEQSUB 810 

720 LOCATE 0. 1 1 : PRINT "BAJAR »|Nt(2) 
730 LOCATE 0,12:PRINTSPC(20) 
740 IF JU=2 THEN LOCATE 0, 13:PRINT"DER 
ECHA ";:GOSUB 810 

750 LOCATE 0, 12:PRINT"DERECHA ";N$(3) 

m LOCATE 0, Í3:PRINTSPC(20) 

770 IF JU=2 THEN LOCATE 0, 14: PRINT" IZQ 

UIERDA ";:G0SUB B10 

780 LOCATE 0. 13: PRINT IZQUIERDA ";N$(4 

) 

m LOCATE 0,14:PRINTSPC(20) 
900 GOTO 830 
810 NI=NI+1 

820 N$(NI)=INPUT$(1):PRINTN$(NI):RETUR 
N 



830 PRINT: PRINT" CONFORME 

840 A$=INPUT$(1):IF A$="S" THEN 850 EL 

SE IF Af="N" THEN CLS:GOTO 210 ELSE 34 



850 CLS 

860 RE=0:D=0:A$=": VPOKE 8204, 28: 7P0KE 
8205, 124: VPOKE 8210, 236: VPOKE 8217,15 
6: VPOKE B206.1B8 
870 VPOKE 8219,76 
880 VPOKE 8220,156 

890 IF F>0 OR G>0 THEN IF F>ÜÜ-Í THEN 
BEEP:PLAY"DEFED": PRINT" JUGADOR NUMERO 
UNO HA PERDIDO" ELSE IF G>NU-1 THEN B 
EEP:PLAY"GABAG":PRINT" JUGADOR NUMERO 
DOS HA PERDIDO' 

900 IF F>0 OR G>0 THEN PRINT: PRI NT "PUN 
TUACION":PRINT:PRlNT:PRINT" JUGADOR UN 
0,"F"ACCIDENTES":PRINT:PPINT n JUGADOR 
DOS/G"ACCIDErES":PRI\ ,T :PRINT 
910 IF FL«t THEN J1=J1+P1: J2=J2+P2 
920 IF FLsl THEN PRINT: PRINT: PRINT"NUH 
ERO DE ESTRELLAS : ":PPINT:PRINT:PRINT" 
JUGADOR L'NC/sPi;" TOTAL:": J1:PRINT 
SPRINT" JUGADOR D0S,";P2:" TOTAL: ";J 
2 

930 IF F*5M THEN IF FWM OR g>NlM 

THEN EO T 1670 

940 FOR 1=1 TO 2000:NEXT 

950 I c FL=1 THEN FOR 1=1 TO 2000:NEXT 

960 IF !NKEY$<>"" THEN "60 

970 BEEP 

980 CLS 



HARD GOPY 

SERIE ORO DE MANHATTAN 



Con Hard Copy iniciamos lo que hemos dado en llamar 
Serie Oro. A partir del próximo mes ya estará disponi- 
ble el primero de los cássettes de aplicación. Con Hard 
Copy, desarrollado totalmente en Código Máquina, el 
usuario podrá realizar copias en tres formatos diferen- 
tes, hacer simulación en blanco y negro de los colores 
por degradación de grises, copiar sprites, grabar o 
cargar pantallas en cinta, copiar en inverso, redefinir 
tonos de colores, etc. Además dispondrá de menús 
por ventanas y controlar el Hard mediante cursores o 
joysticks. Y lo que es más importante es que es com- 
patible con cualquier tipo de impresora. 



990 FOR 1=6144 TO 6911 STEP 32 
1000 VPOKE I,104:VPOKE 1+31,104 
1010 NEXT 

1020 FOR 1=6144 TO 6175 
1030 VPOKE 1,104 
1040 VPOKE 1+735,104 
1050 NEXT 

1060 IF CO=0 THEN 1110 
1070 FOR 1=1 TO CU 

1080 R=INT(RND(l)t570)+6240:IF VPEEK(R 
)<>32 THEN 1080 
1090 VPOKE R,219 
1100 NEXT 

1110 IF FL=0 THEN 1170 
1120 FOR 1=1 TO FK 

1130 R=INT(RNDm*5 7 ?]+6240:: c VPEEKÍR 
)<>32 THEN 1130 
1140 VPOKE R.114 
1150 NEXT 
1160 P1=0:P2=0 

1170 X1=6237:A=101:Y1=-1:VPQKE Xl.A+10 


1180 X=6818:B=102:Y=1:VPQKE X.9 

1190 FOR 1=1 TO W-VEt2¡IF D=0 THEN D= 

STICK(JO) 

1200 IF A$="" THEN A$*INKEY$ 

1210 NEXT I 

1220 PLAY"T255L64C6í" 

1230 ic D=0 THEN 1310 

1240 IF D=0 AND A*="" THEN 1190 

1250 IF D=l T HEN vi=-32:ft=i00 

1260 IF D=5 THEN V1=+32:A=I03 





M * ^vruz 

c< "»Patl W e cÓÍ, ' CO,or es. 
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Programa 




1270 IF D=7 THEN yi»-ltA*lf I 
129? IF D=3 THEN Y1=*1:A=102 
!2"0 IF RE=1 THEN RE=0:RETURN 
1300 IF A$="" THEN 1370 
t:i0 : p AI=N$(1) THEN Y=-32:B=100 
1320 !F A$=N$(2)THEN Y=*32:B=103 
1330 IF A$=NI(4) THEN Y=-1:BM01 
1340 IF A$=N$(3) THEN Y=+1:B=102 
1350 ÍF RE=1 THEN RE=0:RETURN 
1360 IF JU=1 THEN Y=0 
1370 D=0:A$="" 

1380 X1=X1+Y1:IF VPEEK(Xi) >32 THEN 5DT 
2 1430 ELSE VPOKE Xl-Yl, 150: VPOKE XI, A 
+100 

1390 IF JIM THEN 1190 

1400 X=X*Y: IF VPEEKÍX) >32 THEN GOTO 15 

20 ELSE VPOKE X-Y, 150: VPOKE X,B 

1410 60T0 1190 

1420 RETURN 

1430 VV=0:IF VPEEK(X1)=114 THEN VV=1:P 
l»Pl*l! VPOKE Xl-Yl, 150: VPOKE Xl.A+100; 
IF P1*P2>=FK THEN IF FI=1 THEN IF Pl>= 
'■2 THEN Y=0:GOTO 1550 ELSE GOTO 1460 
1440 IF VV=1 THEN BEEP:PLAY"T255L64AD" 
:VV=0:GOTO 1390 

1450 IF JU=2 AND VPEEKU+Y) >32 AND VPE 

EK(X+YX>114 THEN GOTO 1590 

1460 VV=0:PRINT"COCHE 1 PIERDE" : F=F*1 

1470 VPOKE Xl-Yl, 230 

1480 GOSUB 1720 

1490 FOR 1=1 TO 2000:NEXT 

1500 CLS 



1510 GOTO 860 

1520 VV=0;IF VPEEK(X)=114 THEN VV=1:P2 
«P2+1: VPOKE X-Y,150:VPOKE X,B¡IF P2+P1 
>=FK THEN IF FI=1 THEN IF P2>=P1 THEN 
Y1=0:GOTO 1460 ELSE GOTO 1550 
1530 IF VV=1 THEN BEEP:PLAY"T255L64AD" 
:VV=0:GOTO 1410 

1540 IF VPEEK(X1+Y1)>32 AND VPEEKUl+Y 

DOH4 THEN GOTO 1590 

1550 VV=0:PRINT"COCHE 2 PIERDE" : 6=6+1 

1560 VPOKE X-Y. 232 

1570 GOSUB 1720 

1580 GOTO 1490 

1590 PRINT-LOS DOS COCHES PIERDEN" 
1600 IF VPEEK(X1-Y1)=150 THEN Y1=0 
1610 IF VPEEK(X-Y)*!50 THEN Y=0 



Test de listados 




1620 VPOKE X-Y, 232 
1630 VPOKE Xl-Yl, 230 
1640 GOSUB 1720 
1650 GOTO 1490 
1660 GOTO 860 

1670 PRINT:PRINT"QTRA L5/M 

1680 ft$=INPUT*ÜHIF A«>"N" AND ASO" 

S" THEN 1680 

1690 IF A$="N" THEN END 

1700 Jl=0:J2=0:Pl=0:P2=0:! r =0:G=0 

1710 GOTO 980 

1720 BEEP:SOUND 0,0:SOUND 1,5:S0ÜND 2. 


1730 SOUND 3,13:S0UND 4,255:S0UND 5,15 

P40 SOÜND 6, 30; SOUND 7.0 

1750 SOUND 9, 16: SOUND 9, 16: SOUND 10,16 

1760 SCUND 11,0:SOUND 12, 15: SOUND 13,0 

1770 FOR IX=0 TO 80-.NEXT 

1 7 80 SOUND 12,56:S0UND 13,0 

1790 FOR IX*! TO 2500:NEXT 

1900 RETURN 

1810 DATA 56,124.124.254,255,127,126,5 
6 

1820 DATA "0,126,90,24,24,219,255.219 
1830 DATA 7,231.66,255,255,66,231.7 
1840 DATA 224,231,66,255,255,66,231,22 
4 

1850 DATA 219.255.219,24,24,90, 126.50 
1G60 DATA 60.126, 231, 1*5.195,231, 126,6 


1870 DATA 16.3.16.170,35,8,16.8 
1880 DA T A !48,7T } é2»,187,127,l?4,5B,77 



10 


-142 


190 


-156 


370 


- 92 


550 


-231 


730 


- 38 


910 


■227 


1090 


- 46 


1270 


■ 11 


1450 


- 53 


1630 


-236 


1813 - 33 


20 


-175 


200 


-131 


380 


- 42 


560 


-211 


740 


-111 


920 


-210 


1100 


-131 


1280 


- 7 


1460 


-191 


1640 


- B9 


182? -195 


30 


- 58 


210 


- 45 


390 


- 15 


570 


-128 


750 


- 61 


930 


- 24 


1110 


-155 


1290 


- 92 


1470 


-236 


1650 


-110 


1830 - 99 


40 
50 


-216 


220 


- 80 


400 


- 24 


580 


-198 


760 


- 39 


940 


- 85 


1120 


- 54 


1300 


-106 


1480 


- 89 


1660 


-246 


1840 - 36 


-140 


230 


- 74 


410 


-182 


590 


-229 


770 


- 50 


950 


- 77 


1130 


- 18 


1310 


-181 


14^0 


- 95 


1670 


-n: 


1850 -195 


60 


-131 


240 


- 25 


420 


-198 


600 


-218 


780 


- 1 


960 


- 68 


1140 


-197 


1320 


-134 


1500 


-159 


1690 


- T) 

1 L 


1960 - 32 


70 


- 24 


250 


- 74 


430 


-226 


610 


- 85 


790 


- 40 


970 


-192 


1150 


-131 


1330 


-189 


1510 


-246 


1690 


-204 


1870 -154 


B0 


-216 


260 


-158 


440 


- 74 


620 


- 47 


800 


-216 


°80 


-159 


1160 


- 61 


1340 


-187 


1520 


-231 


1^00 


-169 


1890 -220 


90 


-140 


270 


-211 


450 


- 92 


630 


-233 


810 


- 7*7 


990 


-214 


1170 


-248 


1350 


- 92 


1530 


_ < Tí 


1710 


-110 




100 


-156 


280 


-160 


460 


-201 


640 


- 86 


820 


- 66 


1000 


-189 


1 180 


- 89 


1360 


- 94 


1540 


- "8 


1720 


-172 




110 


-131 


290 


-212 


470 


-169 


650 


- 72 


B30 


-115 


1010 


-131 


1190 


-242 


1370 


- 22 


1550 


-194 


1730 


-203 




120 


-248 


300 


-193 


480 


-123 


660 


- 7 


840 


-1B1 


1020 


-214 


1200 


- 61 


1380 


-140 


iS60 


-140 


1740 


-135 




130 


-216 


310 


- 41 


490 


-179 


670 


-182 


850 


-159 


1030 


-178 


1210 


-204 


1390 


-1B9 


1570 


- 89 


1750 


-237 




140 


-140 


320 


- 79 


500 


-145 


680 


- 46 


860 


-200 


1040 


-160 


1220 


- 88 


1400 


- 44 


1580 


-110 


1760 


-213 




150 


-131 


330 


- 50 


510 


-152 


690 


-210 


870 


-132 


1050 


-131 


1230 


-218 


1410 


- 65 


1590 


-101 


1770 


-229 




160 


- 64 


340 


-198 


520 


- 16 


700 


- 48 


8B0 


-213 


1060 


- 95 


1240 


-239 


1420 


-142 


1600 


-112 


1780 


-169 




170 


-216 


350 


- 50 


530 


- 96 


710 


-226 


890 


-197 


1070 


- 61 


1250 


- 1 


1430 


-219 


1610 


-221 


1790 


-112 


TOTAL: 


180 


-140 


360 


- 3 


540 


- 72 


720 


-175 


900 


-165 


1080 


-224 


1260 


- 7 


1440 


-102 


1620 


-140 


1800 


-142 


24810 
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Programa i 



ipor Ronii 



ESTRELLAS 



Representa mil y unas estre- 
llas de diferentes formas y tama- 
ños gracias a este miniprograma 
gráfico. Modifica tú mismo el 
programa para obtener diferen- 
tes efectos. 



10 - ttmmmmtmmtm 

20 J t m mi para ksxcüjb * 

30 ' $ ESTRELLAS I 

40 ' mntnmmnmmm 

50 CLS:C0LQR 5,1,1 

60 DEFINTI , E, T 

70 R«INT<FND f-TIHE) ti5) +2 

B0 L=10 'separación de las lineas 

90 SCREEN 2 

100 P=l/2 ' tamafía de la estrella 
L10 GOTO 130 

120 P=Pt2 'decrBfeBta tamaño 
130 IF L<1 THÉM BOTO 270 ELSE CLS 
140 FOR G=0 '0 170 STEP 120/P+2 

150 FOR T=0 TQ 228 STEP 180/P+2 

160 P=R+2:IF R=17 THEN R=3 ELSE IF R=l 
B THEN R=4 ELSE IF R=16 THEN R=2 
170 FOR 1=5 T0 100/P+5 STEP L 

151 LINE(90/P+i0+T,50/P+5*G)-(lfl+T,I*G 



P*5tS:) r R 

240 NEXT I,T,B 

250 IF P>4 THEN L=L-3:ECT0 100 

260 GOTO 120 

270 COLOR .,5:G0TC 270 



192 LINE(B0/F+10+T,,5i/P+3*B)-{Í^/F*!í 
200 NEXT I 

210 FOR 1=10 TQ 160/P+10 STEP L 

210 L:NE(80' c '*lfc-T,50/P^G)-(I+T,!-G) 

fefl Ufó (B0/P*10«T, 5f /P+5+6 J ->{ 1+T, mi 



Test de listados 



10 - 58 

2? - 58 

30 - 5B 

40 - 58 

50 - 40 
L J -232 

70 -190 

80 -142 

90 -216 

m -146 



110 - 25 
120 -207 
130 -211 
140 - 6 
150 -137 
160 -216 
170 -143 
180 -174 
190 -146 
200 -204 



210 -20° 
220 -171 
230 - 33 
240 -191 
250 -122 
260 - 15 
270 - 

Tí TAL: 




JUEGA COMO UN CAMPEON 

METE EL GOL QUE TE HARA MILLONARIO 

QUINIELAS 

El programa imprescindible para la liga más larga 
de la historia española 

QUINIELAS te ofrece: 

introducir 38 equipos - introducir el partido de la jornada - almacenar los resultados, los goles 
locales y los goles visitantes - estadística gráfica de aciertos - realizar 25 boletos de 8 apuestas 
(200), por reducción o al azar - sacar los boletos por impresora - clasificación detallada - 
estadística gráfica de equipos - estadística gráfica de quinielas - grabación de datos en cinta - 
escrutinio de boletos memorizados - consultas y correcciones - etc., etc. 

PIDENOS QUINIELAS HOY MISMO SOLO 700 Ptas. 



Programa 



ipor Ronald Van Ginkel 



TESORO 



Recoge las 15 llaves que hay 
distribuidas por la pantalla para 
así poder abrir el corre del teso- 
ro. Pero ten cuidado con las nu- 
merosas calaveras y con el peli- 
grosísimo pulpo. 




9 "CREEN l,2í!I0TN 11 

29 COLOR 1,9,9 

30 DEFINT A-7 
40 (MI 

50 2=3 

60 DEF FNA(X)=«X-6144)\32 

79 DEP FHB<X)=U-él44HFIMKX)t32 

80 PRINT" t i t TESORO » * t" 
90 PRINTíPRINT" Intenta abrir el co-fre 

del tesoro cogiendo las 15 llaves 
que están repartidas en la pan 
talla." 

100 PRINT" Pero ten cuidado de no choc 
ar con las calaveras, ya que las po 
bres no han cosido desde hace un par d 
e cientos de años y ya se sabe que la 
carne es débil." 

110 PRINT" Por cierto, vigila taibien 
a Findo, el pulpo, no esta muy ha 
ibriento pero no quiere que abras el 
cofre, y hará todo lo que este en su 
s tentáculos para ii-pedirtelo." 
120 PRINT" El juego consta de 11. panta 
lias, cada una mas difícil que la an 
tenor, para pasarlas disponesde 3 vid 
as." 

130 PRINT:PRINT n ]oystick c Teclado?"; 
!4f »«i«PUT*<mr* B$'>"J n AND 5$<>"T 
" THEN ^2 

150 IF St="T" THEN W=0 ELBE W=l 

160 SCREEN 1¡F0R 1=900 tq 8B7-.READ 3:V 

POKE :.3:NEXT 

170 FQR 1-960 TO «?67:PEAD Q:VP0KE I,Bi 
NEXT 

160 *y l=im TO 1047: READ Q:TOE I, 
3: NEXT 

190 FOP 1=1120 TO U27-.READ QsVPQKE I, 
3íNEXT 

200 FOP 1=1290 TO mumi Q:TOE !, 
3: NEXT 

210 rOF T =l TO 3:F0R 1=1 tq 32: READ 0: 
AHAt+CHR* (O i NEXTffiPBHEt f T|«**iA$«"" 
:NEX T 

220 TOE 8205,201 
230 TOE 3207.105 





2*0 TOE 8208.73 
250 VPOKE 9209.24" 
260 WKi 8212.233 

270 LOCATE 2,1Í:PPINT» PflN T AL ( .a fpÉPfl 
";!MJ 

280 LOCATE 2, 12:P$INT"VIDAS DISPONIBLE 
S: n ;Z 

290 C 0R 1=1 T 2000: NEXT 

300 IF 2<Í THEN FOR 1=1 TO 3000:NEXT:R 

UN 

310 CLS 

320 f>RIN7S T RING$':32."á") 
330 FOR I=6Í44 T C 691 1 STE P 32 
340 VPOKE I. 163: VPQKE U31.162 
350 NEXT 

360 FOR 1=6890 TO 6911 
370 VPOKE 1.161 
380 NEXT 

390 IF TINE>30000 T HEN T :?E=:NT' T !?1E'l 
000) 

400 A=í TIME) WD 100 

410 FOP 1=1 T A:A=RNDíl):NEXT 



420 W 1=1 TO 30 

a=l>JTfRND(i5t75íi)+¿:44 

440 IF VPEEK(AV>32 THEN 430 
450 TOE A. 120 
460 NEXT 

í 7 ? FOP 1=1 T 15 

480 A*INT(PNDtt)t73í!«-6!*4 

*°? I c V p EEKfA)<>32 THEN 480 

500 TOE A. 140 

510 NEXT 

520 A=!N T ^ND(l)t767)*6144 

530 IF VPEEK(AK>32 THEN 520 

5*0 X=A:TOE X.130 

550 A=INT(RND(l)t767)+6144 

560 I c VPEEK(AK>32 THEN 550 

£71 v=fl ; ypCKE Y,110:K=32 

580 A=IN T (PNüa)r67^6144 

rq ? je VPEEKIA)=32 AND V P EEK(A X 1)=32 A 

NC VPE£K(A*32)«32 ANO TO^'A*33)=32 T 

U EN! T=T ELSE 580 

600 8=FNA(A) 

610 C= C NB(A) 



26 



620 Bl=BtB:C!=C*9 

630 PUT SPRITE 3,(C1.B!-2).1.1 

640 por 1=1 to mimn 

650 p LAY B T255L64V13AflB8AfiBB H 
660 IF PLAY ( 15 *-i THEN 660 
670 F=STICK(H) 
6B0 «=0 

690 IF ^=1 THEN «1=-32 
700 IF F=5 THEN !<=32 
7|0 IF F=3 THEN K*l 
720 IF F=7 THEN H»-! 
730 I c M =0 THEN 760 

740 L=yPEEK'V*Mí;IF LOI-2 THEN 5CSÜB B 
80:60*0 B70 
750 Y*Y*1 

760 H»H*íslF HVj THEN «=0 ELSE 350 

770 BsFNAtXJiG-FIfflíX) 

780 Ü= c NA'Y):E=FNBm 

700 je RNflUX.S THEN 810 
800 N=((B>ü)-'B<D))t32:I i: NOI THEN 5C 
T 920 

810 WOEWCtÉ] 

520 JF Mr0 ^HEN B00 

830 J»WEEK(M«)j !F 1*111 then 1000 

m WHtmU y-N,ií!K=J:TOE X.130: 

N=0 

850 IF M<>0 THEN V p 0KE Y-^.32: VPOKE Y. 
110 

860 FGF 1=1 TO 'j: c =0:NEr 

970 ECTO 670 

880 IF 1*120 THEN 1000 

m !P L*U0 T HEN plAY'L5011200S10N73R 

30*73": 5=5+ 1:IF 5<15 Tu EN 1&m 750 E 

LSE °20 

900 IF 1*130 TU EN 1000 
910, RSTURN 

920 V D OKE Y.T2: V^^E V+ V.10 

9!0 pc E P.PLAv>'Le52^30000Ní5N46L4N45L2N 

46LlN47 n . ,, S2 M 30000L9N37P8L4N3 7e 2L'.v::" 



=40 P'JT SPRITE 3.;C1.B1-2M,3 
950 PUT SPRITE 2, 101,11-2), II, 2 
960 PQR 1=1 T 5000:NEXT 
970 H«0t6*fl 
«80 U=ü-1 

990 PES T OPE:GOTO 160 

1000 IF 1=120 THEN PLAY"T255li4V13F66F 

BBAABFF" 

1010 IF LO120 THEN PLAY'T25ÍU«VnB9A 

BBAA56FFFB" 

1020 VPOKE 8205,73 

1030 IF PLAY(1)=-1 THEN 1030 

1040 2=Z-1 

1050 U =0:E=0 

1060 PEST0PE:50 T 160 

1070 END 

1080 DATAlB°.126,21 Q .255.2:i.lB t '.; !.l 
26 

10°0 DATA 129.90. 60. °0. 60.36. "0.153 
1100 DA T A126,"0. 126.60.90, 165. 165. 165 
1110 DATAM.162.229.253.5.2.0 
¡120 D&TA25B, 255. 255. 2!!. 255.231. 1«3,1 
2" 

1130 DATA 1 2? . 1 95 . 23 1 . 255 . 255 . 255 . 255 , 2 
55 

1140 DATA255.127.63.:i.::.63.12^.255 
1150 BA T A255, 254. 252. 2*9.2*9, 252. 254. 2 
55 

1160 data 0. 15, 59. 109,427/128, 191 , 23°. 
!S 7 ,25V. O 0.25!.!?:,2??.:*7.255.0.240, 
22?. 182.25*. 1.253. 247,221, 127,125, 223. 
253, 24 7 , 169. 255 

1170 DATA M,22,:2^37..-27,S3.'I;M,.M 
,0,0,0.0.0.0.128.108.152.112.169.0.0,0 
,0.0.0.0.0.0 

1180 DATO 63,90,127,191,255.191,111,25 
5. 170, 223. 163. 255.181. 223.181. 255. 252, 
171,250.255,253.255.253,255, 173, 251. 23 
7,127. 22!. 247,65.255 



Test de listados 



10 


-255 


160 


- 94 


310 


-159 


460 


-131 


610 


-229 


760 


- 50 


910 


-142 


1060 


-253 


20 


- 91 


170 


-237 


320 


-228 


470 


-195 


620 


-156 


770 


- 46 


920 


-154 


1070 


-129 


30 


- 57 


1B0 


-143 


330 


-214 


480 


-251 


630 


-159 


7 80 


- 52 


930 


- 66 


1080 


-155 


40 


- 93 


190 


- 47 


340 


- 50 


490 


-106 


640 


- 85 


790 


- 18 


"40 


-161 


1090 


- "3 


50 


- 93 


200 


-214 


350 


-131 


500 


-206 


650 


-113 


300 


-184 


950 


-166 


1100 


-246 


60 
70 


-220 


210 


- 77 


360 


-222 


510 


-131 


660 


- 32 


810 


-191 


"60 


- 25 


1110 


-127 


-221 


220 


-243 


370 


-215 


520 


- 12 


670 


-126 


820 


-196 


970 


-201 


1120 


-149 


80 


-173 


230 


-149 


380 


-131 


530 


-147 


581 


- 77 


830 


- k 


980 


-157 


1130 


-149 


90 


- 39 


240 


-118 


390 


- 52 


540 


-157 


690 


-">" 


840 


- 72 


9°P 


.»}*» 


1140 


-190 


100 


-149 


250 


- 39 


4Í0 


-186 


550 


- '2 


700 


-251 


850 


- 60 


1000 


-137 


1150 


-148 


110 


-204 


260 


- 26 


410 


-247 


560 


-177 


710 


-252 


860 


- 55 


1010 


-237 


1160 


-135 


120 


-106 


270 


-254 


420 


-210 


570 


- 14 


720 


-242 


870 


- 55 


1020 


-115 


1170 


-255 


130 


-149 


280 


-195 


430 


-251 


580 


- 12 


730 


-186 


880 


- 32 


1030 


-148 


11B0 


-136 


140 


- 94 


290 


- 85 


440 


- 56 


590 


-205 


740 


-218 


890 


-152 


1040 


-167 


TOTAL: 



ENTRA EN EL FANTASTICO 
MUNDO DE LA ALTA 
TECNOLOGIA MUSICAL CON TU 
ORDENADOR MSX Y 
SISTEMAS MIDI 

DESCUBRE LOS NUEVOS 
SONIDOS SINTETIZADOS Y LAS 
FABULOSAS POSIBILIDADES DE 

LA INFORMATICA MUSICAL 

APROVECHA AHORA 
ESTA OFERTA MUY 
ESPECIAL: 



50% de Descuento en el precio del Interface MIDI MIDI- 
TRACK PERFORMER para MSX y 2 Cables MIDI, al 
adquirirlos junto con tu sintetizador en SISTEMAS MIDI. 

Sólo 23 180,- en lugar de 46 360,- 




i¿| 3334* 



"'-«'.U DB'i MID1THACX PERFOWUIR 



NUESTRA SELECCION 
DE SINTETIZADORES 

• CASIO CZ-101 (teclas pequeñas): 89.700,- 

• CASIO CZ- 1000 (teclas normales): 128.200,- 

• YAMAHA DX-100 (teclas pequeñas): 85.000.- 

• YAMAHA DX-27 (teclas normales): 115.900,- 

PROGRAMA MIDITRACK PERFORMER 

• Secuenciador de 8 pistas polifónicas programables 
en tiempo real. 

• Auto-corrección, Pinchazo, Sincronización, etc. 

NOTA: Los precios indicados incluyen IVA. 



SISTEMAS MIDI 
(Una División de VENTAMATIC) 
c/ Córcega, 89, entio. - 08029 BARCELONA 
Tel.: (93) 230 97 90 / 230 98 05 



r 



Nombre y Apellidos: 
Dirección: 



Población: CP. 

Provincia: 

□ Deseo recibir: 





El importe de mi pedido lo hago efectivo mediante: 
I Cheque adjunto 

I ] Giro Postal Número 



Contra-Reembolso (más gastos de envió 
3% en caso de envió por agencia). 
Con cargo a mi Tarjeta de Crédito VISA 7 
MASTERCARD / AMERICAN EXPRESS I 
(más gastos de envío) Número , 



Caduca: 



Firma: 



Programa 



ipor Ricard Ferreri 



FUNCIONES 



Este programa puede dar las 
gráficas de las funciones que el 
usuario defina, además de po- 
der ampliar una zona determi- 
nada de dicha gráfica. 



II • iMmmtttmtmtttttttMm* 

20 ' I FUNCIONES t 

30 ' t t 

41 ' t pe RICARD FEPRER 53ra t 

50 ' t * 

60 ' t «X-CLUB DE PROGRAMAS í 

70 mtmmmmmmmmm* 

80 ' 

90 COLORIA, 1 . i : WIDTH40: KEYOFF: CLB 
100 KEYl.'RUN !30"*CHR$(13) 
110 SOTO 570 

120 LOCATE l, hPRINT* DEFINA LA FUNCION 
EN LA LINEA N2 130, " : PRINT: PRIfJT" putS 
E 'RETO' Y A CONTINUACION LA »sPP!N T 
:PRINT" TECLA 71' : ": LOCATE0. 8:L!ST 1 
30 

130 DEF FNA(X)= X A 2 ¡'USUAfi 
10 

140 A=50:S=88:L=0:I=-15:Z=15:P=.2:X1=: 
7:Vi=82:ES=5:V=l:H=90:Hl=175:G=0:R=P:W 
=0:' INICIALIZA VARIABLES DEL PSOSEAiW 
150 0N ERROR GOTO 14B0 

160 ' iiHinimimiii 

ESPACIO" 
170 1 

1B0 ' DIBUJO COORDENADAS INICIALES 
190 * 

200 SCREEN 2,2 
210 GOSUB 1200 

220 QPEN B GRP: d F0R OUTPUT ASI1 

230 FORT=50 T0 200: PSET (T, 90) . 8: NEXTT 

240 FQRT=0 T0 175: PSET ( 125, T) ,8:NEXTT 

250 PRESET (110,0): PRINTtl , °y- 

260 PRESET (207, 90) -.PRINTtl, V 

270 : 

281 F0RUMT02 

290 FORT=50 TO 200 STEP 5 

300 PSET(T,S),8 

310 NEXTT 

320 5*5*1 

330 NEXTU 

340 ' 

351 ' DIBUJA LA FUNCION DEFINIDA 
160 ' 

570 K=10:K1=10 

380 IF V»l THEN PRESET (60, 185) : PRINTftl 




."CALCULANDO FUNCIOH" 

390 FOF X= I TO Z STEP P 

400 L=L+ltIF A>255 THEN 530 

410 Y=FNA(X) 

420 Y=(H-Y»ES) 

430 IF L*l THEN Y0=Y:NEXT X 

440 IF Y0<0 OR Y0>H1 THEN A=A+1:Y0=Y:G 

OTO 480 

450 LINE(A,Y0)-(A+1,Y),5:W=1 

460 A=A*1 

470 Y0=Y 

480 NEXT X 

490 ' 

500 ' 

510 PRESET(60,185):COLORl:PRINTil.EP$: 



C0L0R14 

520 IF m\ THEN PRESET (45, 185) :P*INT* 

1, "NO PUEDE VISUALIZARSE M :FORJ=1TO!600 

:NEXTJ:G0T0 570 

530 IF V=l THEN 740 

540 IF H=20 THEN K1=1B0 

550 PRESET (K, Kl ) : PRINT#1 . E$ : PRESET (K+l 

,K1):PRINT*1,E$ 

560 IFINKEY$OCHR$(32)THEN560 

570 ' 

580 ' MENU ÓE OPCIONES 

590 ' 

600 SCREEN 0,,0:CLOSE#1 

610 LOCATE10,2:PRINT"HENU DE OPCIONES: 
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620 LOCATElf , 3l PRINT" 

630 L0CATE2,7:PRINT"1) DEFINIR FUNCION 

640 L0CATE2,9:PRINT"2) VISUALIZAR GRAF 
ICA DE LA FUNCION" 

650 L0CATE2,11:PRINT"3) SALIDA DEL PRO 
GRAMA" 

660 L0CATE2,13:PR1NT"4) INSTRUCCIONES" 
670 LOCATE10,19:PRINT"PULSE OPCION DES 
EADA' 

680 W$=INKEY$ 

690 IFW$=M"THEN CLS:GOTO 120 

700 IFW$='2'THEN 130 

710 IFW*="3"THEN CLS:KEY1, "color n :SCR 

EEN, , 1 :ON ERROR 60TO 0:END 

720 IFW$="4" THEN 1340 

730 GOTO 6B0 

740 ' 

750 ' OPCION A LA AMPLIACION DE ZONA 
760 ' 

770 PUTSPRITE0,(X1,Y1),14,0 

780 DRAWBH14.90C8L12NE3F3" 

790 DRAN"BM35,90C8R12NH3G3" 

800 DRAW-BM25, 80CBUBN53F3" 

810 DRAW"BM25,100C8DBNH3E3" 

820 PRESETU0, 185) :PRINT*1, "MUEVA VENT 

ANA O PULSE ESPACIO" 

830 J=STICK(0):P$=INKEY$ 

840 IFJ=1 THEN Y1=Y1-1:GOTO 940 

850 IF J=2 THEN Y1=Y1-1 : X 1=X 1+1 : GGTO 9 

40 

B60 IFJ=3 THEN Xl=Xl+l:GOTO 940 

B70 IF J«4 THEN Y1=Y1+1:X1=X1M:60T0 9 

40 

880 IFJ=5 THEN Yl=Yl+l:GQTO 940 

890 IF J=6 THEN Y 1 =Y 1 + 1 : X 1 = X 1 - 1 : SOTO 9 



900 IFJ=7 THEN Xl=Xl-l:GOTO 940 

910 IF J»fl THEN Y1=Y1-1:X1=X1-1:60T0 9 

40 

920 IFPf=CHR$<13) THEN 1000 
930 IF P$=CHR$(32) THEN 570 
940 IFY1>=92 THEN Yl=92 
950 IFY1<=71 THEN Yl=7i 
96i IFXKM7 THEN Xl=17 
970 IFX1>=200THEN XI =200 
980 PUT SPRITE0,(X1,Y1),14,0 
990 60TO 830 

1000 V=0: CLS: PUTSPRITE0, ( X 1 , Yl ) , 0, 
1010 ' 

1020 ' VARIABLES PARA LA AMPLIACION 
1030 ' 

1040 ES=60:G=INT(<X1-125)/5):I=G 

1050 IF Yl<=79 THEN HM80 

1060 IF Yl>=85 THEN H=20 

1070 IF H= 180 THEN R=4 

1080 IF H=20 THEN R=-15 

1 090 F0RT*1T0255:PSET(T,H) , 8: NEXTT 

1100 F0RB-1T0255STEPES 

1110 IFG=0 THEN LINE(B,0)-(B,191),8 

1120 LINE(B,H-3)-(B,H+3),8 

1130 PRESET(B-3,H+R):PRINTil,5 

1140 6=6+1 

1150 NEXT B 

1160 Z=5 

1170 P=. 016666 

11B0 A=1:L=0:H1=191 

1190 GOTO 340 

1200 ' 

1210 » CREA VENTANA/SPRITE DE 16x16 
1220 ' 

1230 RESTORE: 8$=" " 
1240 F0RT=1T032 
1250 READ A$ 

1260 B$=B$+CHR$(VAL("tcH"+A$)) 



1270 NEXT T 

1280 SPRITE$(0)=B$ 

1290 RETURN 

1300 DATA FF, 80, 80, 80, 80, 80,80, 80 
1310 DATA 80, 80,80,80,80,80, 80, FF 
1320 DATA FF, 01, 01, 01, 01, 01, 01, 01 
1330 DATA 01, 01, 01, 01, 01, 01, 01, FF 
1340 ' 

1350 ' INSTRUCCIONES 
1360 ' 

1370 CL8 

1380 L0CATE6,1:PRINT"I N S T R U C C I 
O N E S: " 

1390 L0CATE5,2:PRINT" 

■ 

1400 _ LOCATE0,5:PRINT"Defina la función 
matemática de la cual desee conocer s 
u gráfica en función de x siguiendo la 
s indicaciones de la opción n2 1 del i 
enó," 

1410 LOCATE!, ll:PRINT"La gráfica será 
dibujada y seguidaioente";PRINT" podrá 
ampliar una zona determinada de " 
1420 PRINT" la misma moviendo la venta 
na con los ":PRINT" cursores y puls 
ando 'RETURN', o bien ■ 
1430 PRINT" pulsar ESPACIO para volver 
al mena." 

1440 L0CATE15,22:PRINT"ESPACI0 PARA ME 
NU" 

1450 IF INKEY$OCHR$(32) THEN 1450 
1460 60T0 570 
1470 ' 

1480 ' TRATAMIENTO DE ERRORES 
1490 ' 

1500 IF ERR=11 OR ERR=2 AND ERL=410 TH 
EN RESUME 460 

1510 END: ' FINAL DE PROGRAMA 



Test de listado 



10 


- 58 


150 


-159 


20 


- 58 


160 


-181 


30 


- 58 


170 


- 58 


40 


- 58 


180 


- 58 


50 


-'58 


190 


- 58 


60 


- 58 


200 


- 23 


70 


- 58 


210 


- 79 


80 


- 5B 


220 


-177 


90 


- 49 


230 


- 66 


100 


-202 


240 


- 28 


110 


-211 


250 


-183 


120 


- 4 


260 


-111 


130 


- 34 


270 


- 58 


140 


-211 


280 


-196 



290 


-168 


430 


-132 


570 


- 58 


710 


- 1 


850 


-118 


990 


-216 


1130 


-134 


1270' 


-215 


1410 - 23 
1420 - 45 
1430 -144 


300 


- 43 


440 


- 7 


580 


- 58 


720 


-150 


860 


- 54 


1000 


- 42 


1140 


-128 


1280 


-162 


310 


-215 


450 


-214 


590 


- 58 


730 


- 65 


870 


-119 


1010 


- 58 


1150 


-197 


1290 


-142 


320 


-152 


460 


-116 


600 


- 98 


740 


- 5B 


880 


- 5B 


1020 


- 58 


1160 


-144 


1300 


- 28 


1440 -179 
1450 -225 
1460 -211 


330 


-216 


470 


-209 


610 


-151 


750 


- 58 


890 


-122 


1030 


- 58 


1170 


-119 


1310 


- 28 


340 


- 58 


480 


-219 


620 


-158 


760 


- 58 


900 


- 59 


1040 


- 50 


1180 


- 56 


1320 


-235 


350 


- 58 


490 


- 58 


630 


-171 


770 


-205 


910 


-125 


1050 


- 38 


1190 


-236 


1330 


-235 


1470 - 58 
1480 - 58 
1490 - 58 
1500 - 28 

1510 -245 


360 


- 58 


500 


- 58 


640 

650 


-186 


780 


-244 


920 


-195 


1060 


-138 


1200 


- 58 


1340 


- 58 


370 


- 17 


510 


- 85 


-120 


790 


- 1 


930 


- 7 


1070 


-181 


1210 


- 58 


1350 


- 58 


380 


-103 


520 


-104 


660 


-136 


800 


-213 


940 


- 27 


1080 


- 16 


1220 


- 58 


1360 


- 58 


390 


-113 


530 


-176 


670 


-134 


810 


-237 


950 


-243 


1090 


- 41 


1230 


- 95 


1370 


-159 


400 


-136 


340 


-237 


680 
690 


- 86 


820 


-248 


960 


-133 


1100 


- 32 


1240 


-191 


1380 


- 95 


410 


- 16 


550 


-117 


- 44 


830 


-197 


970 


-241 


1110 


-239 


1250 


-236 


1390 


-226 


TOTAL: 


420 


-183 


560 


-100 


700 


-213 


840 


- 55 


980 


-205 


1120 


-255 


1260 


-126 


1400 


-236 


17632 























MSX Softwarei 



i Por Joaquín López™ 



MSXDOS, EL "DOS 
DEL ESTANDAR 



II El MSXDOS es el sistema ope- 
rativo de disco del estándar 
MSX. Su cometido es abrir el 
camino a las aplicaciones verda- 
deramente profesionales. Co- 
nozcamos, pues, algunas de sus 
interioridades 



Hasta hace pocos años, la comu- 
nicación entre el usuario y 
el ordenador se hacia median- 
te tarjetas, previamente perforadas, 
que el operador introducía en la má- 

3uina. Tras una buena espera, que po- 
ía alargarse incluso días, el ordenador 
daba los resultados en un papel. Natu- 
ralmente cada modificación implicaba 
repetir todo el proceso, con lo que los 
tiempos empleados en el desarrollo de 
programas eran eternos. 

En la actualidad, los modernos orde- 
nadores han sustituido las tarjetas per- 
foradas por el teclado y la salida impre- 
sa por los monitores de vídeo, dando 
paso a los sistemas interactivos, en los 
que el operador y la máquina dialogan 
en tiempo real. Sin embargo, hoy como 
ayer se siguen controlando a estas má- 
quinas con un complejo programa en- 
cargado de gestionar todo el flujo de 
datos de entrada y de salida: el sistema 
operativo o, abreviadamente, S.O. 

Otra cosa que no ha variado es el uso 
y la necesidad de métodos rápidos para 
el almacenamiento masivo ae la infor- 
mación. Puesto que las unidades de 
disco son los instrumentos más utiliza- 
dos para este fin, se vio la importancia 
de incluir en el S.O. una parte que con- 
trolara a los mencionados periféricos, 
dando paso al DOS (Disk Operating 
System). 

Existen numerosos "DOS" para mi- 
croordenadores, pero dos de ellos se 
reparten más del noventa por ciento 
del \ mercado mundial (1985), el CP/M 
y el MS DOS. 

CP/M y MS-DOS 

El primer sistema operativo de disco 
digno de ese nombre, aparecido para 
microordenadores, fue el CP/M ( Con- 
trol Program for Microprocesor), de la 
mano de Digital Research. Inicialmen- 
te desarrollado para las CPUs de Intel 
8080 y 8085, a principio de la década 
de los setenta, ei CP/M fue adaptado, 
en posteriores versiones, para el mejor 
y más popular de los microprocesado- 
res de ocho bits: el Zilog* Z80. 

Este sistema operativo ha mantenido 




su hegemonía en el campo de las apli- 
caciones profesionales para microor- 
denadores hasta la aparición del PC 
(Personal Computer) de IBM, que lle- 
vó apareada la introducción de un nue- 
vo SO, el PC-DOS o, su versión comer- 
cial, el MS-DOS (MicroSoft Disk Ope- 
rating System). Sin embargo, a pesar de 
su obsolecencia, DR vende hoy más li- 
cencias de su CP/M que en los tiempos 
en los que no tenía competencia. El 
motivo: la proliferación de los "home 
computers". 

Aunque el CP/M sigue siendo el SO 
más instalado en microordenadores, va 



cediendo su sitio al MS-DOS. Las razo- 
nes principales son dos: el auge de los 
PC compatibles y la neta superioridad 
del segundo en todos los aspectos (me- 
jor gestión de los discos, mensajes de 
errores claros, sofisticaciones típicas 
de los SO modernos, etc). 



EL MSXDOS 

El MSX Disk Basic es en realidad un 
sistema operativo de disco, puesto que 
contiene todo lo necesario para mane- 
jar este periférico de forma eficiente. 
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Ahora bien, puesto que resulta antie- 
conómico para un fabricante de soft- 
ware crear programas limitados a un 
solo tipo de máquina, el estándar optó 
por agregarle un nuevo sistema opera- 
tivo de disco que permitiera tener acce- 
so a la amplia biblioteca de programas 
del CP/M va existente. De esta forma 
nació el MSXDOS, que se comporta 
internamente como un CP/M (versión 
2.2), pero que da, de cara al usuario, la 
impresión de estar trabajando con un 
MS-DOS (versión 1.1). Esto no resulta 
sorprendente si se tiene en cuenta que 
tanto el MSXDOS como el MS-DOS 
provienen del mismo fabricante, Mi- 
croSoft. 

ARRANQUE DEL MSXDOS 

El MSXDOS se suministra en un 
disquette junto con las unidades de dis- 
co MSX (¡cuidado!, no todos los fabri- 
cantes lo hacen), y se compone de dos 
ficheros: MSXDOS.SYS y COM- 
MAND.COM. 

En realidad, las rutinas para manejar 
físicamente el disco están incluidas en 
el controlador, que se aloja en la ranura 
de cartuchos. Este controlador está do- 
tado de 16K de ROM y algo de RAM 
(¡siete bits!), empleándose esta última 
para memorizar cosas tales como el 
funcionamiento del motor o la presen- 
cia o no de un disquette. 

Para "bootar" o arrancar el sistema, 
hay que introducir el disco en la unidad 
y encender el ordenador. Al poco, apa- 
rece un mensaje de "copyright" y la 
versión correspondiente, invitándonos 
a introducir la hora, si la máquina care- 
ce de reloj. El punto importante es sa- 
ber la secuencia de acontecimientos 
que han tenido lugar hasta la puesta en 
marcha del sistema. 

En primer lugar, el ordenador detec- 
ta un cartucho conectado (el controla- 
dor del disco) y le cede el mando. A 
continuación el programa alojado en el 
controlador comprueba si hay un disco 
en línea, y en caso afirmativo inicializa 
varias zonas de la RAM. Acto seguido 
se busca en el directorio el fichero es- 
pecial AUTOEXEC.BAS, para ejecu- 
tarlo si se encuentra. De no ser así, se 
cargan el primer sector (grabado en to- 
dos los discos durante la operación de 
ajuste a formato, FORMAT), y se eje- 
cuta el pequeño cargador que contie- 
nen. 

El cargador en cuestión busca el fi- 
chero MSXDOS.SYS y le cede el con- 
trol. Este busca a su vez el fichero 
COMMAND.COM y de nuevo se 
cede el control. 

Es ahora cuando el ordenador ha 
completado toda la operación de carga 



y está listo para recibir una orden des- 
de la consola, salvo que el disco con- 
tenga un fichero llamado AUTOE- 
XEC.BAT, en cuyo caso el programa 
escrito en COMMAND.COM susti- 
tuirá el teclado por el contenido de este 
fichero. 

El método anterior es similar en to- 
dos los DOS y se denomina Bootstrap 
(cordón de zapato). La palabra está to- 
mada de un dicho inglés, que refleja 
bastante bien todo el proceso, y que 
dice algo así como levantarse estirando 
de los propios cordones de los zapatos. 

MANDATOS DEL MSXDOS 

A diferencia del CP/M, el MSXDOS 
no lleva grabado en los disquettes el 
procesador de orden de consola (CCP) 
y los mandatos son interpretados por 
un fichero especial (COMMAND. 
COM). Aquí hay un glosario de los 14 
comandos reconocibles: 
BASIC Inicializa el BASIC 
COPY Copia ficheros 
DATE Establece la fecha 
DEL Borra ficheros 
DIR Muestra el directorio 
ERASE Borra ficheros (igual que 
DEL) 

FORMAT Ajusta a formato 
MODE Fija el ancho de la pantalla 
PAUSE Hace una pausa en ficheros 
BAT 

REM Muestra un comentario en 
los ficheros BAT 

REN Cambia el nombre de los fi- 
cheros 

TIME Establece la hora y los mi- 
nutos 

TYPE Muestra un fichero en ASC 
VERIFY Actúa sobre el flag de verifi- 
cación 

Posiblemente conocerás los trece 
primeros mandatos, pero curiosamen- 
te el último parece ser olvidado en casi 
todos los manuales. 

Su sintaxis es sencilla, se trata de te- 
clear VERIFY seguido de ON o OFF. 
En el primer caso, cada sector que se 

Í;rabe en el disco será comparado con 
os datos originales contenidos en la 
memoria, a fin de asegurar la exactitud 
de los mismos, a costa, eso sí, de una 
mayor lentitud en la grabación. 

EJECUCION DE 
PROGRAMAS 

Existen dos tipos de ficheros ejecu- 
tables en el entorno del MSXDOS, los 
que llevan la extensión COM y los de 
extensión BAT. 

Para ejecutar un fichero COM, basta 
teclear su nombre sin extensión. De 
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esta forma el programa se cargará en la 
TPA (Transien Program Area, área de 
programas en tránsito), que empieza 
en la dirección &H100, y se le cederá el 
control. 

Los otros ficheros ejecutables sirven 
para llevar a cabo un proceso por lotes, 
es decir: sustituir el proceso mecánico 
de teclear siempre los mismos manda- 
tos grabándolos en un fichero con ex- 
tensión BAT que se comportará como 
si nosotros mismos estuviéramos pul- 
sando las teclas. 

La forma de crear un fichero BAT 
desde el MSXDOS es la siguiente: 

Se introduce la orden: COPY CON 
nombre. BAT. 

El cursor se desplazará una línea ha- 
cia abajo y podremos teclear nombres 
de comandos o de ficheros válidos. 
Cada vez que pulsemos RETURN, la 
línea se dará por buena y se esperará 
una nueva, hasta que indiquemos el fi- 
nal pulsando simultáneamente la teclas 
CONTROLyZ(2). 

Luego de ordenar el cierre del fiche- 
ro con 2 , este se grabará en el disco y 
sólo tendremos que llamarlo tecleando 
su nombre (sin extensión). 

COMO "VE" EL DISCO EL 
MSXDOS 

Sin ninguna duda puede decirse que 
los disquettes de 3.5 pulgadas son los 
más difundidos en la norma MSX. 
Existen también unidades de disco que 
trabajan en formato de 3 y 5 1/4 
das, pero son francamente i 




Esto es perfectamente lógico. Basta 
decir aue el año pasado IBM compró 
un millón de unidades de 3.5 pulgadas 
a Sony y que la última generación de 
ordenadores personales (el Appel Mas- 
hitosh, el Atari ST, el Commodore 
Amiga, etc) incorporan, en sus versio- 
nes base, discos de estas características. 

Los disquettes de 3.5 pulgadas tie- 
nen las ventajas de ser muy sólidos v 
fiables, a la vez que se protegen fácil- 
mente contra escritura y no es necesa- 
rio dar la vuelta al disco para tener ac- 
ceso a las dos caras. Su mayor inconve- 
niente es el precio, si los comparamos 
con los de 5 1/4, aunque están oajando 
rápidamente. 

Los disquettes de 3.5 pulgadas están 
formados por 80 pistas por cara, cada 
una de las cuales contienen nueve sec- 
tores de 5 12 bytes. Durante el ajuste a 
formato (FORMAT), el software del 
controlador marca los sectores y los 
deja en situación de ser accesibles. 

El MSXDOS agrupa dos sectores 
para formar un "cluster", que es la can- 
tidad mínima de información que pue- 
de ser grabada en el disco de forma in- 
dependiente a través del DOS. Es im- 
portante resaltar este punto, ya que un 
Fichero de un sólo byte ocupará en el 
disco un cluster completo (1024 bytes), 
dejando 1023 bytes inutilizados. Ello 
es así para acortar las tablas de localiza- 
ción que se encuentran grabadas en las 
primeras pistas de los disquettes y, por 
extensión, todas las operaciones de E/S. 

Otro punto importante a tener en 
cuenta es la forma en la que el DOS va 



actualizando la información que reci- 
be, hasta su estampación definitiva en 
el disquette. 

Existe una zona de memoria, deno- 
minada DMA (Direct Memory Acces), 
que es donde se realizan las operacio- 
nes de entrada salida del disco. Supon 
que desea cargar un programa en la 
memoria. El DOS leerá un sector lógi- 
co del disco (5 12 bytes) y lo almacenará 
en el DMA. A continuación moverá el 
bloque a su lugar de destino, depen- 
diendo del tipo de operación, y traerá 
otro sector al DMA hasta que se com- 
plete la lectura de los datos. 

Las operaciones de escritura funcio- 
nan de una forma parecida a la ante- 
rior, con la salvedad de que además de 
transportar los datos al disco será nece- 
sario actualizar el directorio. Ya que 
modificar el directorio para cada acce- 
so al disco sería demasiado largo y fati- 
goso para la unidad, el DOS guarda 
permanentemente en la memoria una 
pequeña parte de él, de suerte que el 
disquette sólo sea actualizado cuando 
se proceda al cierre del fichero. El pro- 
blema es que desde la apertura de un fi- 
chero hasta su cierre puede haber tiem- 
pos muertos en los que el sistema estará 
a la espera de recibir los nuevos datos. 
Si en ese lapso se inserta un disquette 
diferente al que contenía el fichero 
abierto, el DOS escribirá el directorio 
en el nuevo disco y éste quedará inutili- 
zado. 

Sé bien que lo anterior asustará a 
más de un usuario, pero esto es algo 
que ocurre también en el CP/M y en el 
MS DOS. La solución pasa por ser cui- 
dadosos, sobre todo con los ficheros 
BAT, en los que la orden COPY CON 
implica la apertura inmediata del fiche- 
ro, lo que impide el cambio del dis- 
quette hasta que se complete o se abor- 
te la operación. 

Volviendo al DMA, el sistema guar- 
da en la posición &HF351 y siguiente 
la dirección de esta zona de comunica- 
ciones. Ello carece de importancia para 
el programador que no piense utilizar 
las instrucciones del Disk Basic 
"DSKI$" y "DSKO$". Estas órdenes 
sirven para leer y escribir respectiva- 
mente un sector del disco. Lo que re- 
sulta sorprendente es que sean descara- 
damente olvidadas en casi todos los 
manuales de los fabricantes. Incluso 
hay un manual original que las cita 
mientras la correspondiente versión 
castellana las omite sutilmente. 

La sintaxis de estas instrucciones es 
la siguiente: 

DSKI$ (Número de disco, Sector lógico) 
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En los MSX existen dos posibles vías de acceder al sistema operativo, la ROM 
BIOS con elMSX-DISKy el MSX DOS contenido en la unidad de disco. 
Vemos en gráñco adjunto la distribución de estos dos sistemas en un MSX-2. 



El número de disco puede estar 
comprendido entre y 7 y se debe indi- 
car un para la unidad A:, un 1 para la 
B:, etc. 

El sector lógico variará en función 
de que estemos empleando una unidad 
de una o dos caras. El máximo es de 
720, para el primer caso, y de 1440, 
para el segundo. 

DSKO$ tiene una sintaxis idéntica a 
la anterior, con la diferencia de que hay 
que suprimir los paréntesis que encie- 
rran a los parámetros. 

No hay que decir el efecto desastro- 
so que puede producir el uso indebido 
de DSKO$, puesto que se escribirá el 
contenido del DMA en el sector espe- 
cificado y ello, si se reaHza inadecuada- 
mente, puede inutilizar el disquette. 

A continuación tienes un pequeño 
programa que sirve para echar un "vis- 
tazo" al contenido de los sectores del 
disco. 



10FORY=0TO719 

20 A$=DSKI$ (O, Y) 

30P=PEEK(&HF35 1 ) +256* 

PEEK(&HF352) 

40 FORX=PTOP+511 

50 IF PEEK (X)>32 THEN PRINT 

CHR$ (PEEK (X)); ELSE PRINT ""; 

60NEXTX.Y 



EN EL INTERIOR DEL 
MSXDOS 

Existen dos maneras convencionales 
de construir un BIOS, bien usando una 
tabla de saltos (caso del BIOS de la 
ROM de los MSX) o mediante funcio- 
nes. Esto último es lo que emplea el 
MSXDOS. 

Si conoces el BIOS de la ROM, sa- 
brás que cada vector apunta a una ruti- 
na que realiza un cometido específico 
(sacar caracteres a la pantalla, escribir 



en la impresora o en el cassette, leer el 
teclado, etc.). Pues bien, el empleo de 
funciones conduce a un resultado final 
idéntico, pero, en lugar de saltar a una 
dirección para cada rutina, existe una 
posición fija que bifurca hacia el lugar 
deseado, en función del valor de una 
variable. 

Este es el sistema empleado por los 
programas para comunicarse con el 
MSXDOS, que, como ya se ha dicho, 
es compatible con el CP/M. 

Si estás interesado en conocer la es- 
tructura interna del MSXDOS, te 
aconsejo que te hagas con un buen ma- 
nuel de CP/M (me permito recomen- 
darte "CP/M, Manual Para Programa- 
dores"; es de la editorial McGraw-Hill 
y cuesta algo más de 3000 pts.). La ar- 
quitectura interna de ambos sistemas 
es muy similar, con pequeñas diferen- 
cias en las asignaciones del I/O byte, de 
las que carece el MSXDOS, y en la ob- 
tención y fijación de la fecha y hora, 
que el CP/M no tiene. 



CONCLUSIONES 

La principal ventaja. del MSXDOS 
es que da acceso a una amplia bibliote- 
ca de programas escritos para CP/M y, 
en verdad, esto basta para justificar su 
existencia. Sobre todo ahora que los fa- 
bricantes de software ven incrementar- 
se los microordenadores con este siste- 
ma operativo. Aunque, para ser justos, 
esto es debido en parte a la aparición 
del AMSTRAD 6128, que incluye el 
CP/M en su versión base. Sin embargo, 
es dudoso que un fabricante de electró- 
nica de consumo (AMSTRAD) aguan- 
te durante mucho tiempo en el merca- 
do si sigue suministrando utilidades 
CP/M para el microprocesador 8080, 
(cuando el 6128 lleva en su interior un 
Z80); si insiste en fabricar ordenadores 
con cassette incorporado, pero sin 
cuenta vueltas; impresoras que sólo sir- 
ven para una máquina (la circuetería 
está en el ordenador); o compatibles 
PC en los que no puedes utilizar un 
monitor estándar, un teclado normali- 
zado o una tarjeta de gráficos popular. 
Confiemos, empero, que consiga po- 
tenciar el mercado del CP/M, ahora 
que han hecho su aparición los MSX2 
que pueden operar con 80 columnas y 
soportar los paquetes profesionales 
para este sistema sin ningún problema. 

*Zibg es una empresa formada por un grupo 
de técnicos escindidos de Intel, cuyo primer tra- 
bajo fue desarrollar la CPU Z80. Las siglas "Z¡- 
log" se descomponen de esta manera: "Z", la úl- 
tima letra del alfabeto; "i", de integrado (circui- 
to integrado); y "log" de lógico. De esta forma, 
el resultado es algo así como "Zilog, la última 
palabra en circuitos integrados lógicos". 
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AMAZONAS 



Monitor al día 



NOVEDADES IDEALOGIC 
PARA MSX2 

Nuevos títulos de Telaríum y 
Spinnaker 



Los chicos de Idealogic han apro- 
vechado el invierno a fon- 
do. Prueba de ello son las nue- 
vas adaptaciones que han realizado 
para PHILIPS de tres nuevos títulos, 
dos de ellos de la serie Telarium y el 
restante de Spinnaker. 

Los nuevos títulos en cuestión son 
Amazonas, de Michael Crichton, Nue- 
ve príncipes en Amber de Roger Zelaz- 
ny y Profesión detective, con un nuevo 
caso de Tom Snyder. Como puede ver- 
se, hay para todos los gustos. 

Amazonas, de la serie Telarium es la 




adaptación de la célebre novela de es- 
pionaje donde -en este caso- el usuario 
es un agente especial de la National Sa- 
tellite Resources Technology, frío, ana- 
lítico y extraordinariamente hábil en el 
manejo de los ordenadores, que recibe 
una transmisión muy especial en la sala 
de control de comunicaciones de la 
central... 



El siguiente título, también de Tela- 
rium está basado en la serie de novelas 
"Amber" de Roger Zelazny; concreta- 
mente en " Nueve Príncipes en Amber" 
y "Las pistolas de Avaíon" donde el 
protagonista se encuentra con un mon- 
tón de elementos adversos en su contra 
(amnesia, intrigas políticas para recu- 
perar un trono...) en fin, el juego ideal 
para amantes de la ciencia ficción. 

El tercer título ¿Quién robó a Lily? 
es una apasionante aventura policiaca 
(el segundo caso de Tom Snyder) don- 
de el detective/usuario debe recuperar 
a Lily, el delfín acróbata con todo ío 
que ello comporta (pruebas, huellas, 
interrogatorios...) 

Como puede verse se trata de una 
excelente selección de títulos pensados 
para satisfacer a público de todos los 
gustos. Además, los títulos de Tela- 
rium tienen el aliciente adicional de 
que los autores de las respectivas nove- 
las han intervenido en su confección. 
En resumen, una auténtica gozada. 



ZAYDOCK E HYDLIDE 



Dos nuevos títulos de SONY 
para MSX2 

Habrán visto nuestros lectores 
que este mes, esta sección 
de noticias podría titularse 
"Avalancha de software" por la canti- 




dad de títulos que les estamos antici- 
pando. ¿Se acuerdan de aquellos ago- 
reros que decían no hace mucho que lo 
importante de un ordenador era en 
realidad el software disponible para él, 
y que apenas había títulos para MSX?.. 
Me imagino que deben estarse mor- 
diendo la lengua. 

Dejémonos de preámbulos. El pri- 
mer título, ZAYDOCK, es un apasio- 
nante " Arcade" que va de batalla espa- 
cial, con unos gráficos que quitan el 
hipo y un desarrollo de juego comple- 
tísimo. Está previsto para uno o dos ju- 
gadores que pueden jugar simultánea- 
mente y -cosa sorprendente- no han 
de destruirse entre sí. El juego tiene 72 
impresionantes pantallas y la anima- 
ción está realizada punto a punto. Se 
suministra en diskette de 3'5". 

El otro título, HYDLIDE es un jue- 
go en tiempo real que combina la aven- 
tura de descubrir tesoros escondidos 
con personajes "vivos" que modifican 
su comportamiento según el desarrollo 
de la acción y con rescate de princesa 
incluido. Es un desafío a la imagina- 
ción y a la destreza en el manejo del te- 
clado. Además, tiene el atractivo de 
que en el mismo diskette hay grabadas 
dos versiones del juego: una para usua- 
rios de MSX2 con 64K de VRAM y 
»ara los de 128K, todo 



MSX HOME OFFICE 
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MSX HOME OFFICE 

Gestión PHILIPS para MSX2 

Dentro de la serie NMS (New 
Media Systems) Philips ha de- 
sarrollado una serie de progra- 
mas de gestión bajo el título genérico 
de MSX Home Office. 

El primer volumen de esta nueva se- 
rie está integrado por dos programas: 
proceso de textos y base de datos, 
mientras que el segundo contiene una 
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hoja de cálculo y un generador de gráfi- 
cos de gestión. 

Una característica interesante de es- 
tos programas es que vienen suminis- 
trados en formato de cartucho con lo 
que, lógicamente la carga es instantá- 
nea. De todos modos, el aliciente prin- 
cipal de los programas en cuestión es 
que -aún estando previstos para apara- 
tos MSX de la segunda generación- 
funcionan tanto en esta segunda gene- 
ración como en la primera, eso sí, con 
alguna limitación perfectamente com- 
prensible como es que, lógicamente, el 
proceso de textos tan sólo trabaja en 40 
columnas en los MSX de primera gene- 
ración mientras que en la segunda tra- 
baja en 80 y que el programa de gráfi- 
cos de gestión está previsto también 
para ser soportado por la VRAM de 
MSX2 y naturalmente -por ser tam- 
bién distinto su tamaño y su pagina- 
ción- no funciona en la primera gene- 
ración. No obstante, este inconvenien- 
te está bien resuelto, y la calidad de los 
programas soslaya con creces estos pe- 
queños inconvenientes. 

Los manuales con los que se acom- 
pañan los programas están excelente- 
mente confeccionados, y la claridad de 
sus instrucciones posibilita que aún sin 
conocimientos informáticos previos, 
los programas puedan ser utilizados sin 
dificultad por cualquier usuario. 



PC'S CONVERTIBLES 

Las 3 '5" implantadas 
definitivamente 



Sabido es que los ordenadores de 
la norma MSX utilizan unidades 
de disco de 3'5" desde un buen 
principio. La ventaja de estas unidades 
reside por un lado en su capacidad y 
por otro en su reducido tamaño. 

Pues bien, hemos comentado en 
ocasiones anteriores que IBM incorpo- 
raría en su modelo ET (Extended Te- 
chnology) unidades de disco de estas 
características, pero hoy la noticia es 
que no sólo va a utilizarse este formato 
en el ET de IBM, sino que los llamados 
PC convertibles también lo incorpo- 
ran. 

El PC convertible Data General/ 
One Modelo 2, ya disponible en Espa- 
ña, incorpora ya dos unidades de 3 '5 a , 
e IBM ha anunciado que próximamen- 
te estará a la venta en nuestro país el ci- 
tado PC convertible también con dos 
unidades de estas características. 

¿Alguien se atreve a dudar de lo in- 
novador del standard MSX? 




Un juego "X" para MSX2 



Este programa es algo inhabitual 
dentro del software que esta- 
mos acostumbrados a ver los su- 
fridos integrantes de esta redacción, y 
posiblemente resultará también extra- 
ño para nuestro lectores. 

Se trata ni más ni menos que de una 
excelente adaptación de un viejo juego 
de salón, que aprovecha al máximo las 
capacidades de digitalización de ima- 
gen de los aparatos MSX de la segunda 

f;eneración, que estamos seguros hará 
as delicias de los mayores, y por su- 
puesto de los pequeños si les resulta 
posible -ya veremos por qué luego- 
afortunados usuarios de estos apara- 
tos. 

Este juego, que ha constituido un 
auténtico "Top ten" desde que ha caí- 
do en esta Santa casa es, ni más ni me- 
nos, que una versión del Strip-Poker. 
Por si alguien no sabe de que va el jue- 
guecito de marras, diremos que consis- 
te en jugar al poker con las reglas habi- 
tuales, pero con el aliciente de que los 
jugadores en lugar de perder dinero, 
pierden una prenda de ropa cada vez 
que se quedan a 0. 

En la versión de AAckosoft para 
Sony, se ha realizado una interesante 
adaptación en la que quien se desnuda 
es una guapísima v soberbia modelo di- 
gitalizada coh pelos y señales, y que es 
capaz de tener "pegado" a la pantalla al 
redactor más eficaz. Como decíamos, 
>s seguros de que este juego inte- 
a los papás que a los hijos, 



PRESS BUTTON 
TO CONTINUE 




La jugadora de poker si pierde al Bnal necesitará 
un tonel o nuestra ayuda. 



pero también suponemos que no hará 
demasiada gracia a las mamás. No obs- 
tante, es de todo punto recomendable. 
De todos modos, y pensando en los 
usuarios de aparatos de primera gene- 
ración, publicamos fotos de la modelo 
de marras, para que puedan confirmar 
nuestra excelente opinión sobre ella. 
Recomendado especialmente para sol- 
teros. 
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'TE DESAFIAMOS • 



ESTAMOS EN INFORMAT 



VER ACRUZ 



¡ACEPTA EL RETO! 



WAR CHESS 




DESAFIAMOS TU IMAGINACION, TU LOGICA, TU ESPIRITU DE 
AVENTURA. A TU JOYSTICK. TE DESAFIAMOS A PASARLO 
BIEN ¡A LO GRANDE! ¡A TOPE CON TU ORDENADOR' 
TE PRESENTAMOS LOS MAS ALUCINANTES JUEGOS. 
SUPERPROGRAMAS. SUPER: DESAFIANTES, INTRIGANTES 
LLENOS DE ESTRATEGIA PARA QUE USES A FONDO TU IMAGI- 
NACION Y DEMUESTRES TU HABILIDAD E INTELIGENCIA TE 
PROPONEMOS HORAS DE DIVERSION SEGURA. 
¿HASTA QUE HORA DE LA MADRUGADA RESISTIRAS? 



¡ACEP 




j¡ IMUVEDAD! ! 



EL CASO VERACRUZ/WAR CHESS/THE MOST AMAZING MEMORY GAME / MANDRAGORA / LAS VEGAS/EL GNOMO FED0R/3D MAGIC PIN BALL/SKATE DRAGON 
V.^l/^' ^ ^ V Pedidos: Tel. 253 74 00 ^ 
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Calle Valencia, 85 ■ 08029 BARCtlONA félex: 54554 D1GC 
teléfonos 253 86 93 - 253 89 09 253 90 45 - 253 74 00 





AQUI HALLARAS TO 
EL SOFTWARE DEL 
MERCADO EN MSX. 
NO TE LO PIERDAS. 
Programas de juegos 
utilidad, educativos, 
gestión. Una guía 
completa con más 
de 100 títulos. 
Cassettes, cartuch 
diskettes, tarjetas y 
libros. 

Además todas las 
is de hard 



software con sus 
direcciones y teléfonos. 
Un número 
imprescindible para 
usuario MSX. 
YA ESTA EN TU 
QUIOSCO 
ISX CLUB ESPECIAL 
rARE algo FUEI 







1. "-Podrán participar todos nuestros lectores 
cualquiera sea su edad. 

2. °-Los programas se clasificarán en tres cate- 
gorías: 

Educativos 
Gestión 

Entretenimiento 

3. "-Los programas deberán ser remitidos gra- 
bados en cassette debidamente protegidas, dentro 
de su estuche de plástico. 

4. -No entrarán en concurso aquellos progra- 
mas que ya hayan sido publicados por otros me- 
dios o plagiados. 

5. "-Junto a los programas se incluirán las ins- 
trucciones correspondientes, detalle de las varia- 
bles, ampliaciones posibles y todos aquellos co- 
mentarios que el autor considere de interés. 

6. "-Todos los programas han de estar estructu- 
rados de modo claro, separando con REM los 
distintos sectores del mismo. 

PREMIOS 

7. --MSX CLUB OTORGARA LOS SI- 
GUIENTES PREMIOS: . 

JOYSTICK DE ORO MSX CLUB Y UNA 
UNIDAD DE DISCO AL MEJOR PROGRA- 
MA DEL AÑO. 

Además mensualmentc se premiarán los pro- 
gramas publicados del siguiente modo: 

10.000 pts. los programas Educativos 

10.000 pts. los programas de Gestión 
6.000 pts. los programas de Entretenimiento 

FALLO Y JURADO 

8. --E1 Departamento de Programación de MSX 
CLUB DE PROGRAMAS hará la primera selec- 
ción de la que saldrán los programas publicados 
en cada número de la revista. 

9. °-Los programas no se devolverán salvo que 
así lo requiera el autor. 

10. "-La elección del PROGRAMA DEL AÑO se 
hará por votación de nuestros lectores a través de 
un boletín que se publicará en el mes de octubre 
de 1987. 

1 l."-EI plazo de entrega de los programas finali- 
zará el 31 de octubre de 1987. 
12."-EI fallo se hará conocer en el número de di- 
ciembre de 1987, entregándose los premios en el 
mismo mes. 




Remitir a: I aus de prggri-iíWí - MI PROGRAMA 
Roca i Batlle, 10-12, bajos 08023 Barcelona 



Otros lenguaj es i 



,por Wüly Miragall, 



LOGO, ¿UN 
LENGUAJE 
DE NIÑOS? 



El lenguaje LOGO ha goza- 
do de un imparable auge en las 
modernas pedagogías ya que 
permite la iniciación a la progra- 
mación a niños de corta edad; 
pero, ¿es sólo un lenguaje de ni- 
ños? 



UN LENGUAJE 
INTELIGENTE 

El LOGO surgió del Laboratorio 
de Inteligencia Artificial del Ins- 
tituto Tecnológico de Massa- 
chusets (MIT), desarrollado por el pro- 
fesor Seymour Papert. 

Según nos cuenta el propio Papert 
en su libro "Desafío a la mente", el len- 
guaje LOGO es más que un lenguaje 
de programación, y es ciertamente así. 
Aquéllos que se hayan acercado en al- 



guna ocasión a un entorno LOGO se 
habrán podido percatar que este len- 
guaje se aparta radicalmente de la idea 
tradicional de programa de ordenador. 
En este lenguaje eimodo de comunica- 
ción con el ordenador es prácticamen- 
te conversacional (al menos eso se pre- 
tende). No en vano el LOGO es un de- 
rivado directo del LISP, uno de los len- 
guajes más extendidos en Inteligencia 
Artificial. 

El rimbombante origen del LOGO 
no es, por tanto, nada trivial. El LOGO 
se encuentra dentro de la línea marca- 



da por los modernos lenguajes de Inte- 
ligencia Artificial (LISP, PROLOG, 
etc.). Ya hemos comentado dentro de 
esta misma serie de "Otros lenguajes" 
la diferencia entre lenguajes de bajo ni- 
vel (muy cercanos al lenguaje máquina 
del ordenador; pero muy complicados 
para las personas) y lenguajes de alto 
nivel (más cercanos al lenguaje huma- 
no; pero más alejados del lenguaje má- 
quina). Podemos clasificar al LOGO 
como uno de los lenguajes de más alto 
nivel existentes hoy en día. 

Pero mejor que empezar a filosofar 



Hemos probado dos versiones diferentes del lenguaje LOGO en los MSX. El logo SONY y su equivalente Philips. 




IPEfrtOGIC 



40 



MSX - LOGO 




El LOGO 



sobre los cómos y los porqués del len- 
guaje LOGO, mejor es que hagamos 
una breve descripción del modo de 
funcionamiento del lenguaje. 

¿COMO ES EL LOGO? 

Antes de empezar con el LOGO de- 
dicaremos un párrafo a su hermano 
mayor, el LISP. El LISP, cuyo nombre 
significa (LISt Processor) Procesador 
de Listas es uno de los lenguajes más 
extendidos en Inteligencia Artificial. 
Intentaremos dar una somera idea de 
su funcionamiento. El LISP es capaz 
de interpretar sentencias entradas por 
el usuario, de combinarlas y de sacar 
conclusiones de ellas a partir de sus in- 
terrelaciones. No es un lenguaje inteli- 
gente; pero es capaz de llegar a conclu- 
siones nada evidentes en un principio 
pero lógicas al fin y al cabo. No se pare- 
ce, por tanto, a otros lenguajes de pro- 
gramación. Aquí los programas no son 
más que conjuntos efe sentencias y sus 
relaciones. 

El LOGO, como discípulo del 
LISP, es también un lenguaje de sen- 
tencias. Pero, ¿por qué se asocia un 
lenguaje de Inteligencia Artificial con 
la pedagogía y los niños? 

Seymour Papert tuvo una brillante 
idea. Conectó a su ordenador un pe- 
queño ROBOT con forma de pequeña 
cúpula cuya apariencia recordaba leja- 
namente a una tortuga. Algunas de las 
sentencias de su nuevo lenguaje, el 
LOGO, permitían desplazar la tortu- 
ga. De este modo se conseguía una vi- 
sualización muy clara de los procesos 
de la máquina gracias al movimiento de 
su pequeño robot. 

Con el paso del tiempo y la llegada 
de las pantallas gráficas la tortuga fue 



sustituida por un pequeño cursor en el 
centro de la pantalla (a veces con forma 
de tortuga, otras con forma de un pe- 
queño triángulo). Con algunas de las 
sentencias de LOGO se podía despla- 
zar la tortuga (se impuso finalmente 
este nombre al cursor LOGO) por la 
pantalla, y combinándolas llegar a ge- 
nerar interesantes dibujos. 

El proceso resultaba tan fácil que el 
tópico de "hasta un niño puede hacer- 
lo" se convirtió en realidad. La princi- 
pal ventaja del LOGO no es, como mu- 
chos piensan, que permite iniciar en la 
informática a los más pequeños. Su in- 
terés radica, principalmente, en que 
permite que los niños, desde muy pe- 
queños, sean capaces de tratar con da- 
tos abstractos. Algo tan poco material 
como pueda ser eltrabajo con ángulos 
y rotaciones es evidente al poco tiempo 
de trabajar con la tortuga. Para los ni- 
ños es sólo un juego; jugar a dibujar 
con la tortuga; pero, sin saberlo están 
interiorizando conceptos como los de 
ángulo, distancia, número. Incluso el 
teorema de Pitágoras es evidente si se 
dispone de una tortuga. ¿Se imaginan a 
un niño de 6 años trabajando con el 
Teorema de Pitágoras? 

En la mayoría de los casos los niños 
usan el ordenador de forma esporádi- 
ca, como un juguete ocasional, y los re- 
sultados no son tan espectaculares; 
pero aún así se consigue un gran triun- 
fo, los niños aprenden a comprender lo 
que no pueden ver ni tocar: números, 
ángulos, distancias, etc. 

Vamos a ver algunas de las instruc- 
ciones LOGO para que sea más claro 
todo lo que hemos dicho. 

Si hacemos AVANZA 10 la tortuga 
avanza 10 pasos hacia adelante. En 
cambio, si hacemos RETROCEDE 20, 
la tortuga retrocede 20 pasos. 



Al hacer DERECHA 90 la tortuga 
gira 90 grados hacia la derecha, y algo 
similar ocurre si hacemos IZQUIER- 
DA 90. Con esto y muy poco más po- 
demos sentar a un niño delante del or- 
denador. No hace falta que le expli- 
quemos lo que es un ángulo, ni cuantos 
grados tiene un ángulo recto. A los 20 
minutos de estar ante el ordenador 
cualquier niño sería capaz de darnos 
clases de geometría. El potencial de 
aprendizaje infantil es muy elevado y 
enseguida se llega a la conclusión de 
que un ángulo recto es el de 90 grados, 
o que una vuelta completa de la tortuga 
equivale a 360 grados. 

Otra de las grandes facetas del 
LOGO es que permite generar nues- 
tras instrucciones. Por ejemplo: 

PARA CUADRADO 

REPITE 4 [AVANZA 40 DERECHA 

90] 

FIN 

PROGRAMANDO EN 
LOGO 

Vamos a realizar algunos programas 
en LOGO. Las ilustraciones que 
acompañan a este artículo os mostra- 
rán los resultados obtenidos. 

Utilizando la instrucción CUADRA- 
DO definida un poco más arriba, defi- 
nimos ahora: 

PARA ESTRELLA 
REPITE 36 [CUADRADO 
DERECHA 10] 
FIN 

Para ejecutar el programa que aca- 
bamos de realizar sólo hemos de te- 
clear ESTRELLA, como si se tratase 
de cualquier otra instrucción del 
LOGO. 

Pero para usuarios más avanzados 
podemos realizar programas con una 
complejidad ligeramente mayor. 

PARA POLIGONO :LADOS 
:TALLA 

REPITE :LADOS [AV : TALLA DE 

360/: LADOS] 

FIN 

Vemos que el LOGO también per- 
mite trabajar con variables, en este caso 
:LADOS y :TALLA, y que se permite 
abreviar algunas instrucciones, como 
AVANZA (AV) y DERECHA (DE). 

LA POTENCIA OCULTA 
DEL LOGO 

Por lo que hemos visto hasta ahora el 
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Otros lenguajes™ 

LOGO no deja de ser un lenguaje cu- 
rioso, tal vez interesante. Pero estamos 
seguros de que más de uno piensa que 
este lenguaje no es más que una curiosi- 
dad informática para que jueguen los 
niños. 

Nada más lejos de la realidad. El 
LOGO, debido a sus nobles orígenes 
es un lenguaje potente, un lenguaje que 
permite realizar programas complejos. 
La imagen un tanto estereotipada del 
LOGO como lenguaje infantil ha he- 
cho que muchos no vean en él más que 
eso, un lenguaje infantil. Este hecho ha 
provocado que aparezcan muchas ver- 
siones de LOGO que incorporan úni- 
camente las instrucciones gráficas, con 
lo que desmerecen totalmente la verda- 
dera finalidad del LOGO. 

En cierta ocasión escuché un comen- 
tario que refleja fielmente el concepto 
del LOGO. A la afirmación de que el 
LOGO era un lenguaje para niños por- 
que éstos lo utilizaban alguien respon- 
dió que por la misma razón el castella- 
no es un lenguaje de niños, y bien que 
Cervantes y otros muchos escritores no 
dudaron en usarlo. 

El LOGO permite más estructuras 
de programación que otros lenguajes, 
como el BASIC. Incorpora la posibili- 
dad de anidar una definición dentro de 
otra tantas veces como deseemos. Per- 
mite también la recursividad (el BASIC 
no la permite), que consiste en permitir 
que una rutina se llame a sí misma de 
modo indefinido o con una condición 
de salida (el BASIC permite anidar 255 
GOSUBs tras lo cual marca un error; 
pero para salir de ellos necesitamos 
¡255RETURNs!). 

El LOGO también permite opcio- 




Las dos versiones de LOGO que hemos podido utilizar se 
distribuyen en formato cartucho. 



nes como el manejo rápido y cómodo 
de tablas y ficheros. En definitiva un 
lenguaje que permite generar todo tipo 
de programas, desde los más inocentes 
a complejos programas de ficheros. 

EL LOGO EN LOS MSX 



En los MSX existen varias implanta- 
ciones de LOGO. Hemos podido utili- 
zar dos de ellas, una desarrollada por 



IDEALOGIC y distribuida por Sony, 
y otra distribuida por Philips. 

Ambas versiones del lenguaje tienen 
una calidad similar a grandes rasgos, 
cada una tiene sus ventajas e inconve- 
nientes. Pero hay, sin embargo, ciertos 
aspectos diferenciadores a tener en 
cuenta. 

La versión de Philips de este lengua- 
je está más enfocada al trabajo con grá- 
ficos (aunque soporta las demás ins- 



El comando polígono, que definíamos en la página anterior nos ht 
permitido realizar este gráfico. 




Para ejecutar nuestros programas basta con utilizarlos como si fuesen 
instrucciones normales. Ejemplo de uso del programa ESTRELLA. 



- soné 

- Son => 
e .§ o f> © 
: Sonó 
J 3 o n o 

: s o »-> o 

I 5. O r-l O 

f 5 o n o 

- S O f> 

i 5 o n o 

l 5. O m O 

- 5 o n P 
i Son o 
i <3 o n o 
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trucciones de ficheros, trabajo con dis- 
cos, etc), hecho que se observa al leer el 
manual que acompaña al cartucho. 

La versión de Sony está mucho más 
enfocada a la cara seria de este lengua- 
je, dando una gran importancia a las es- 
tructuras de programación en su ma- 
nual. 

Otra ventaja adicional de esta última 
versión es que sus instrucciones se aco- 
gen al estándar dictado por el Proyecto 
Atenea del Ministerio de Educación. 



Otro detalle que puede tener impor- 
tancia es la mayor velocidad del 
LOGO Sony en algunas tareas deter- 
minadas. 

La elección de uno de estos o de 
cualquiera de los otros existentes en el 
mercado recae finalmente en el gusto 
personal, en los precios, y en las necesi- 
dades de cada uno. Incluimos a conti- 
nuación una lista de las versiones de 
LOGO existentes para los MSX. 

El primero de ellos es LOGO de 



Idealogic, comercializado por Sony en 
formato cartucho y con un precio apro- 
ximado de 12.500 ptas. Otro de los que 
ya hemos hablado es LOGO de Phi- 
lips, también en formato cartucho y 
con un precio aproximado de 11.500 
Ptas. Philips dispone también de una 
versión simplificada de este lenguaje, 
Mini Logo comercializado en cassette a 
un precio de unas 2000 Ptas. Existe, 
también de Philips, una cinta de "Ini- 
ciación al Logo". 





ggBXCluE) 



UTIL DE RECALO! 




¡uta 





N " 1 a 4 • 475 p TAS N°* 5 a 8 - 475 PTAS. Nr 9 y 10 - 300 PTAS. N? 11 - 175 PTAS. N? 12 - 175 PTAS. Nv 13 - 175 PTAS 




N? 14 - 175 PTAS. 



N° 15 - 175 PTAS. 



N» 16 y 17 - 350 PTAS. N? 18-175 PTAS. N? 19 - 175 PTAS 




N? 20 - 175 PTAS. N? 21 - 175 PTAS. N.° 22-23 350 PTAS. N.° 24 - 225 PTAS. 

¡SI TE HACE FALTA ALGUN NUMERO DE 1 





N.° 25 -225 PTAS. N.° 26 - 225 PTAS. 

PIDELO HOY MISMO! 



Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el . 
pon y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 



cu- 



BOLETIN DE PEDIDO 



Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

gastos de envío, por lo que adjunto talón n.° del Banco/Caja 

fñZ^&mSte — "~ F^»m^a»M^TCA WTÍMTOÍA. - 

CALLE N.° CIUDAD "Z ""4 i "' 

DP^......... PROVINCIA TEL Z" 
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Software MSX 



■Claudia Tello Helblingi 



SKY HAWK 



Este es un magnífico simulador 
de vuelo diseñado por Juan A. 
Castillo Rívas, el autor de U- 
Boot, que pone a prueba la po- 
tencial capacidad de pilotaje de 
los jugadores 





o simulador de vuelo desarrollado por Juan A. Castillo Rivas, eí autor de U-Boot. Con este programa el jugador puede poner 
Tde orientación en el espacio sin más referencias que las proporcionadas por el instrumental 



Sky Hawk es un simulador de vue- 
lo de gran realismo y versatilidad 
que pone a prueba la capacidad 
de los jugadores para resolver situacio- 
nes críticas. 

Todos sabemos que manejar una 
gran nave y más si esta nave es de gue- 
rra, como es el caso de Sky Hawk, re- 
sulta altamente conflictivo para perso- 
nas no habituadas a esta tarea. El man- 
do de estos aviones implica tener en 
cuenta una serie de órdenes, mandos, 
situaciones y objetivos que al relacio- 
narlos con el tiempo real cambian to- 
talmente los criterios de los juegos de 
naves convencionales. 

En primer lugar hemos de tener en 
cuenta que no sólo se trata de conse- 
guir el objetivo normal -aquí el de de- 
rribar el avión caza enemigo- sino lle- 
var con la mayor celeridad y precisión 
el aparato por el espacio. Para volar 
con una relativa seguridad, el piloto ha 
de tener en cuenta todas las condicio- 
nes de vuelo, como la altitud, la veloci- 
dad, la potencia de los motores, la dis- 
tancia recorrida, el gasto de combusti- 
ble, la proximidad o lejanía del objeti- 
vo con respecto a la base, etc. Obvia- 
mente todo esto ha de expresarse de un 
modo claro y directo en la pantalla del 
ordenador y el acceso debe ser extre- 




Jugar con este programa resulta verdaderamen- 
te inquietante, pues los mandos responden a un 
tiempo real y no fíe t icio como en 1 
vencionales. 



madamente sencillo, ya que la dificul- 
tad para mantenerse en el aire y llevar 
el avión es bastante grande de por sí. 



El objetivo 

El objetivo de Sky Hawk es localizar 
y derribar un avión enemigo. De todos 
modos, el verdadero objetivo del juego 
es controlar el avión con la mayor peri- 
cia posible. 

Una vez que el juego empieza, los 
motores están en marcha y sólo hay que 
darle mayor potencia para que el avión 
despegue automáticamente del portaa- 
viones. Inmediatamente después el ju- 
gador tiene que localizar en su radar la 
posición del avión enemigo y fijar el 
rumbo. La corrección de éste puede 
verse a través del tablero de mandos, ya 
que una ventana electrónica marca la 
mayor o menor distancia entre la nave y 
el objetivo. Asimismo otras ventanas 
indican la mayor o menor distancia a 
nuestra base, la cantidad de combusti- 
ble de que disponemos y el rumbo en 
grados. Toda esta es una información 
muy importante a la hora de valorar 
nuestras posibilidades de éxito. 

Ya en vuelo hemos de tener en cuen- 
ta que el avión enemigo no es un señue- 
lo rijo, sino que también está despla- 
zándose y que si nos detecta a través de 
su propio radar procurará huir. Esto 
implica a que permanezcamos constan- 
temente atentos a fin de no volar a ton- 
tas y a locas. 
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Cuando consideremos que estamos 
lo suficientemente cerca del avión ene- 
migo, el único modo de darle alcance 
con nuestros misiles es centrarlo cuan- 
do pase frente a nosotros. Para que esto 
sea posible, obviamente debemos estar 
a su misma altitud. Para ello contamos 
con una serie de leds luminosos que 
nos indican en verde si se está por de- 
bajo y rojo si estamos por encima. El 
lea parpadea en blanco cuando nuestra 
altitud y la del enemigo es la misma. 

Al mismo tiempo otros leds nos indi- 
can cambiando de color el número de 
misiles de que disponemos hasta que 
aparece el rojo que nos dice que ya lo 
hemos usado a todos; el recalentamien- 
to de los motores, que se enfrían dismi- 
nuyendo la velocidad; la disposición de 
combate y la de disparo. 



Consideraciones 
de vuelo 

Otra de las cosas interesantes de este 
simulador de vuelo que es Sky Hawk, 
es que la pantalla de radar se transfor- 
ma en mira electrónica cuando el avión 
enemigo está próximo. Pero al margen 
de ésta y otras características importan- 
tes del juego, como la visión del cielo o 
el mar desde la cabina de nuestra nave 
y la fugaz aparición del caza opuesto, es 
el jugador el que tiene que determinar 
sus propias posibilidades de éxito en la 
misión. Quiero decir que si el objetivo 
es localizar, perseguir, derribar al ene- 
migo y tras ello regresar y aterrizar en el 
portaaviones hay que considerar si 
realmente podremos hacer todo esto. 
Puede suceder que la persecución haya 



sido muy larga y que el combustible 
que nos quede no sea suficiente. En ese 
caso lo que conviene es volver a la base 
y repostar. Otro tanto si vemos que es- 
tamos cerca y el combustible es poco. 
En ese caso podemos actuar arriesgan- 
do nuestra vida, pues aunque derribe- 
mos al otro no conseguiremos llegar a 
casa. 

Todas estas son decisiones que el pi- 
loto tiene que considerar y decidir en 
las situaciones críticas, sabiendo en 
todo momento qué sucederá en fun- 
ción de las mismas. 

En síntesis, Sky Hawk es un simula- 
dor cuya filosofía de desarrollo no radi- 
ca tanto en las dificultades de manejo, 
sino en la capacidad de decisión en las 
situaciones extremas. 




Conviértete en el más valiente pilo- 
to interestelar. Libra una especta- 
cular batalla y atraviesa el hiperes- 
pació. Destruye bunkers, minas 
mortales y naves agresoras. Tu des- 
treza y tus misiles puedan salvar la 
vida de los Hornos tiranizados por 
Darus. 

STAR RUNNER ES UN JUEGO 
SENSACIONAL 
Producido por 
Manhattan Transfer, S.A. 
RocaiBatHe, 10-12 
08023 Barcelona 
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¡NOS APLICAMOS A SER UTILES! 

A TRAVES DE MSX CLUB DE MAIUNC PUEDES ADQUIRIR 



BASIC TUTOR IDEALOCIC 




ADAPTADORES TARJETAS | 
INTELIGENTES 
BEE CARD Y SOFTCARD 



ÜÍSI&PV&lSXáHSl' 




Deja el manual de lado. Inserta este breviario de 
BASIC en cartucho y olvídate. No ocupa memoria. 

PVP 3.500 pts. 




Note quedes 
al margen 
y disfruta 
de las tarjetas 
inteligentes. 
Lo último 
en soft. 
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J Nombre y apellidos 

I Dirección ! I 

I Población CP Prov Tel I 

I □ Tutor Basic Ptas. 3.500- □ Adaptador Bee Card Ptas. 2.850- □ Adaptador Softcard Ptas. 2.850- I 

i □ SweetAcorn Ptas. 5.200- □ Backgammon Ptas. 5.200- □ Shark Hunter Ptas. 5.200- i 
I □ BarnStormer Ptas. 5.200- □ Chock'n Pop Ptas. 5.200- □ Le Mans 2 Ras. 5.200 - 

| Gastos de envío por cada producto 100,- pts. Remito talón bancario de pts. a la orden de Manhattan | 

^Transfer, S.A. Enviar a MSX CLUB de MAILING, Roca i Batlle 10-12 bajos - 08023 Barcelona. j 
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